--- a/FileApplicationNoteBook.st	Fri Sep 19 19:08:32 2003 +0200
+++ b/FileApplicationNoteBook.st	Fri Sep 19 19:09:00 2003 +0200
@@ -3909,7 +3909,7 @@
      if modified and answered true, the current contents is written back (accepted)
     "
 
-    |answer string arg d|
+    |answer string arg|
 
     self modifiedChannel value ifFalse:[ ^ false].
 
@@ -3931,15 +3931,10 @@
                 values:#(nil showDiffs false true) 
                 default:nil.
 
-"/    answer := (Dialog confirmWithCancel:(resources string:string with:arg) withCRs).
     answer isNil ifTrue:[^ AbortOperationRequest raise ].
 
     answer == #showDiffs ifTrue:[
         self openDiffView.
-"/        d := DiffTextView 
-"/                openOn:self fileName contentsOfEntireFile label:arg
-"/                and:editView contents label:'Editor'.
-"/        d topView label:'File vs. Editor Contents '.
         AbortOperationRequest raise
     ].
 
@@ -4964,5 +4959,5 @@
 !FileApplicationNoteBook class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.110 2003-09-19 17:08:32 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.111 2003-09-19 17:09:00 cg Exp $'
 ! !