oops - #warning: is #warn:
authorClaus Gittinger <cg@exept.de>
Mon, 05 Oct 1998 12:20:55 +0200
changeset 1913 b5d55f160224
parent 1912 0c8dc1be1553
child 1914 d94b77e0ef43
oops - #warning: is #warn:
BrowserView.st
BrwsrView.st
NewLauncher.st
--- a/BrowserView.st	Sat Oct 03 20:00:54 1998 +0200
+++ b/BrowserView.st	Mon Oct 05 12:20:55 1998 +0200
@@ -10975,7 +10975,7 @@
         cls isNil ifTrue:[
             cls := actualClass.
             cls isNil ifTrue:[
-                self warning:'oops class is gone; reselect and try again'.
+                self warn:'oops class is gone; reselect and try again'.
                 ^ self
             ].
         ].
@@ -12424,6 +12424,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.453 1998-09-28 16:00:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.454 1998-10-05 10:20:55 cg Exp $'
 ! !
 BrowserView initialize!
--- a/BrwsrView.st	Sat Oct 03 20:00:54 1998 +0200
+++ b/BrwsrView.st	Mon Oct 05 12:20:55 1998 +0200
@@ -10975,7 +10975,7 @@
         cls isNil ifTrue:[
             cls := actualClass.
             cls isNil ifTrue:[
-                self warning:'oops class is gone; reselect and try again'.
+                self warn:'oops class is gone; reselect and try again'.
                 ^ self
             ].
         ].
@@ -12424,6 +12424,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.453 1998-09-28 16:00:05 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Attic/BrwsrView.st,v 1.454 1998-10-05 10:20:55 cg Exp $'
 ! !
 BrowserView initialize!
--- a/NewLauncher.st	Sat Oct 03 20:00:54 1998 +0200
+++ b/NewLauncher.st	Mon Oct 05 12:20:55 1998 +0200
@@ -2885,7 +2885,7 @@
         remoteDisplay := XWorkstation new.
         remoteDisplay := remoteDisplay initializeFor:(host , ':0').
         remoteDisplay isNil ifTrue:[
-            self warning:'Could not connet to display.'.
+            self warn:'Could not connet to display.'.
             ^ self
         ].
         remoteDisplay startDispatch.
@@ -3572,5 +3572,5 @@
 !NewLauncher class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.108 1998-09-29 09:33:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/NewLauncher.st,v 1.109 1998-10-05 10:20:06 cg Exp $'
 ! !