UserPreference access
authorClaus Gittinger <cg@exept.de>
Mon, 10 Sep 2001 16:14:34 +0200
changeset 1504 336f460e691b
parent 1503 b3c4b1b1bfbb
child 1505 c7cd2082381b
UserPreference access
ResourceSpecEditor.st
--- a/ResourceSpecEditor.st	Mon Sep 10 11:09:38 2001 +0200
+++ b/ResourceSpecEditor.st	Mon Sep 10 16:14:34 2001 +0200
@@ -551,7 +551,7 @@
     |cls|
 
     (cls := self resolveClassNamed) notNil 
-        ifTrue: [UserPreferences current systemBrowserClass openInClass:cls class selector: specSelector] 
+        ifTrue: [UserPreferences systemBrowserClass openInClass:cls class selector: specSelector] 
         ifFalse:[self information:'No class defined!!']
 !
 
@@ -675,5 +675,5 @@
 !ResourceSpecEditor class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/ResourceSpecEditor.st,v 1.19 2001-05-17 11:11:11 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/ResourceSpecEditor.st,v 1.20 2001-09-10 14:14:34 cg Exp $'
 ! !