Allow hyphen to be used in package name
authorJan Vrany <jan.vrany@labware.com>
Mon, 10 Aug 2020 14:08:39 +0100
changeset 1123 0977ed563ce6
parent 1122 936418b830a2
child 1127 4dd9c37c427b
child 1129 e4a35e896a0d
Allow hyphen to be used in package name
SmallSense__PackageSelectDialog.st
--- a/SmallSense__PackageSelectDialog.st	Fri Jun 12 22:06:58 2020 +0100
+++ b/SmallSense__PackageSelectDialog.st	Mon Aug 10 14:08:39 2020 +0100
@@ -1,6 +1,7 @@
 "
 stx:goodies/smallsense - A productivity plugin for Smalltalk/X IDE
 Copyright (C) 2013-2014 Jan Vrany
+Copyright (C) 2020 LabWare
 
 This library is free software; you can redistribute it and/or
 modify it under the terms of the GNU Lesser General Public
@@ -33,6 +34,7 @@
 "
 stx:goodies/smallsense - A productivity plugin for Smalltalk/X IDE
 Copyright (C) 2013-2014 Jan Vrany
+Copyright (C) 2020 LabWare
 
 This library is free software; you can redistribute it and/or
 modify it under the terms of the GNU Lesser General Public
@@ -74,10 +76,11 @@
 canCreateMatchingObjectFromString:string 
     "Return true, a new object can be created with given string value"
     
-    ^ string notNil and:[ string allSatisfy:[:c | c isLetterOrDigit or:[ '_:/' includes:c ] ] ]
+    ^ string notNil and:[ string allSatisfy:[:c | c isLetterOrDigit or:[ '-_:/' includes:c ] ] ]
 
     "Created: / 23-06-2014 / 15:15:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
     "Modified: / 10-01-2015 / 07:23:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 10-08-2020 / 14:07:28 / Jan Vrany <jan.vrany@labware.com>"
 !
 
 canSelect:selection
@@ -117,3 +120,10 @@
     "Created: / 13-12-2014 / 08:42:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!PackageSelectDialog class methodsFor:'documentation'!
+
+version_HG
+
+    ^ '$Changeset: <not expanded> $'
+! !
+