--- 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