--- a/DebugView.st Sat Jun 02 05:16:00 2018 +0200
+++ b/DebugView.st Sat Jun 02 07:10:12 2018 +0200
@@ -8810,10 +8810,12 @@
!DebugView methodsFor:'user interaction'!
checkIfCodeIsReallyModified
+ "see if there is really a difference between the editor's contents
+ and the current method's source."
+
|methodSource editorCode|
codeView modified ifFalse:[^ false].
-
currentMethod isNil ifTrue:[^ false].
methodSource := currentMethod source.
@@ -8828,6 +8830,8 @@
].
].
^ true
+
+ "Modified (format): / 02-06-2018 / 06:05:27 / Claus Gittinger"
!
checkIfCodeIsReallyModifiedAndConfirmWith:questionString