*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Wed, 18 Oct 2006 13:11:49 +0200
changeset 2265 0ab69cf04a73
parent 2264 8736ee5ec90e
child 2266 2f9a3d9320a7
*** empty log message ***
ResourceSpecEditor.st
--- a/ResourceSpecEditor.st	Mon Oct 16 13:11:20 2006 +0200
+++ b/ResourceSpecEditor.st	Wed Oct 18 13:11:49 2006 +0200
@@ -9,11 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
-
-
-
-
 "{ Package: 'stx:libview2' }"
 
 ToolApplicationModel subclass:#ResourceSpecEditor
@@ -437,7 +432,7 @@
 
     self modified ifTrue:
     [
-        ((YesNoBox title:(resources string:'%1 spec was modified. Proceed?' with:self class resourceType asUppercaseFirst))        
+        ((YesNoBox title:(resources string:'Modified %1 spec was not saved. Proceed?' with:self class resourceType asUppercaseFirst))        
             noText:(resources string:'Cancel');
             yesText:(resources string:'Discard Changes and Proceed');
             showAtPointer;
@@ -446,7 +441,7 @@
     ].
     ^ true
 
-    "Modified: / 20.5.1998 / 03:40:26 / cg"
+    "Modified: / 17-10-2006 / 17:43:53 / cg"
 !
 
 askForModification
@@ -769,5 +764,5 @@
 !ResourceSpecEditor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ResourceSpecEditor.st,v 1.39 2006-10-05 16:46:23 fm Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ResourceSpecEditor.st,v 1.40 2006-10-18 11:11:49 cg Exp $'
 ! !