TypeConverter.st
changeset 4451 07a866507379
parent 4422 11f7d9bc365f
--- a/TypeConverter.st	Sun Feb 23 16:01:31 2020 +0100
+++ b/TypeConverter.st	Sun Feb 23 16:29:45 2020 +0100
@@ -1231,7 +1231,7 @@
                     (s startsWith:'#') ifTrue:[
                         s := s copyFrom:2.
                         (s startsWith:$') ifTrue:[
-                            s := s copyFrom:2 to:(s size - 1)
+                            s := s copyButFirstAndLast
                         ].
                         value := s asSymbol
                     ] ifFalse:[
@@ -1277,7 +1277,7 @@
                     (s startsWith:'#') ifTrue:[
                         s := s copyFrom:2.
                         (s startsWith:$') ifTrue:[
-                            s := s copyFrom:2 to:(s size - 1)
+                            s := s copyButFirstAndLast
                         ]
                     ].
                     value := s asSymbol
@@ -1319,7 +1319,7 @@
                     (s startsWith:'#') ifTrue:[
                         s := s copyFrom:2.
                         (s startsWith:$') ifTrue:[
-                            s := s copyFrom:2 to:(s size - 1)
+                            s := s copyButFirstAndLast
                         ].
                         value := s asSymbol
                     ] ifFalse:[
@@ -1675,7 +1675,7 @@
                             (s startsWith:'#') ifTrue:[
                                 s := s copyFrom:2.
                                 (s startsWith:$') ifTrue:[
-                                    s := s copyFrom:2 to:(s size - 1)
+                                    s := s copyButFirstAndLast
                                 ].
                             ].
                             value := s asSymbol
@@ -1722,7 +1722,7 @@
                         (s startsWith:'#') ifTrue:[
                             s := s copyFrom:2.
                             (s startsWith:$') ifTrue:[
-                                s := s copyFrom:2 to:(s size - 1)
+                                s := s copyButFirstAndLast
                             ].
                         ].
                         value := s asSymbol