--- a/extensions.st	Fri Oct 05 09:35:50 2018 +0200
+++ b/extensions.st	Fri Oct 05 13:42:22 2018 +0200
@@ -1749,7 +1749,7 @@
                 idx == 0 ifTrue:[
                     s
                 ] ifFalse:[    
-                    s , ' " ' , (s copyTo:idx-1) , '×10' , ((s copyFrom:idx+1) asText emphasisAllAdd:#superscript), ' "' 
+                    s , ' " ' , (self printStringScientific) ,' "' 
                 ]
             ];
         add:'-non-scientific (%f-format)' ->
@@ -1776,6 +1776,7 @@
 
     "
      1.0 inspect
+     1.23e14 inspect
      1.0 asShortFloat inspect
      1.0 asLongFloat inspect
      1.0 asQDouble inspect
@@ -1783,6 +1784,7 @@
 
     "Created: / 20-03-2012 / 22:34:46 / cg"
     "Modified: / 18-07-2017 / 15:17:43 / cg"
+    "Modified (comment): / 05-10-2018 / 13:41:41 / Claus Gittinger"
 ! !
 
 !MenuView methodsFor:'accessing-behavior'!