--- a/MiniDebugger.st	Mon Aug 26 22:14:19 2013 +0000
+++ b/MiniDebugger.st	Mon Aug 26 11:43:02 2013 +0200
@@ -648,11 +648,11 @@
         self interpreterLoopWith:nil.
         ^ false
     ].
-    (cmd == $e) ifTrue:[
+    (cmd == $E) ifTrue:[
         Parser evaluate:commandArg.
         ^ false
     ].
-    (cmd == $E) ifTrue:[
+    (cmd == $e) ifTrue:[
         (Parser evaluate:commandArg) printCR.
         ^ false
     ].
@@ -1001,7 +1001,7 @@
    r ...... receiver (in dot) printString
    i ...... inspect receiver (in dot)
    I ...... interpreter (expression evaluator)
-   e expr   evaluate expression
+   e expr   evaluate expression & print result ("E" to not print)
    ? c [p]  help on class c (selectors matching p)
 '  errorPrintCR.
 
@@ -1020,10 +1020,10 @@
 !MiniDebugger class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.86 2013-08-23 17:28:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.87 2013-08-26 09:43:02 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.86 2013-08-23 17:28:01 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/MiniDebugger.st,v 1.87 2013-08-26 09:43:02 cg Exp $'
 ! !