Mercurial Mercurial > hg > stx-libwidg / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
care for 2D look
authorClaus Gittinger <cg@exept.de>
Wed, 17 Jul 1996 12:09:58 +0200
changeset 792 c6953d727789
parent 791 f76f4541742f
child 793 12396da0e36e
care for 2D look
DialogBox.st file | annotate | diff | comparison | revisions 
--- a/DialogBox.st	Mon Jul 15 16:42:09 1996 +0200
+++ b/DialogBox.st	Wed Jul 17 12:09:58 1996 +0200
@@ -21,7 +21,7 @@
 	category:'Views-DialogBoxes'
 !
 
-!DialogBox class methodsFor:'documentation'!
+!DialogBox  class methodsFor:'documentation'!
 
 copyright
 "
@@ -948,7 +948,7 @@
 "
 ! !
 
-!DialogBox class methodsFor:'class initialization'!
+!DialogBox  class methodsFor:'class initialization'!
 
 initialize
     self == DialogBox ifTrue:[
@@ -959,7 +959,7 @@
     "Modified: 10.4.1996 / 08:16:18 / cg"
 ! !
 
-!DialogBox class methodsFor:'common dialogs'!
+!DialogBox  class methodsFor:'common dialogs'!
 
 information:aString
     "launch a Dialog to tell user something"
@@ -995,7 +995,7 @@
     "Modified: 29.5.1996 / 15:23:14 / cg"
 ! !
 
-!DialogBox class methodsFor:'confirmation dialogs'!
+!DialogBox  class methodsFor:'confirmation dialogs'!
 
 confirm:aString
     "launch a Dialog, which allows user to enter yes or no.
@@ -1144,7 +1144,7 @@
     "Modified: 29.5.1996 / 15:24:06 / cg"
 ! !
 
-!DialogBox class methodsFor:'defaults'!
+!DialogBox  class methodsFor:'defaults'!
 
 defaultLabel
     "return the boxes default window title."
@@ -1154,7 +1154,7 @@
     "Created: 23.4.1996 / 17:13:10 / cg"
 ! !
 
-!DialogBox class methodsFor:'file name dialogs'!
+!DialogBox  class methodsFor:'file name dialogs'!
 
 requestDirectoryName
     "same as requestFileName, but only show directories."
@@ -1563,7 +1563,7 @@
     "Modified: 27.1.1996 / 13:44:13 / cg"
 ! !
 
-!DialogBox class methodsFor:'fill in the blank dialogs'!
+!DialogBox  class methodsFor:'fill in the blank dialogs'!
 
 request:aString 
     "launch a Dialog, which allows user to enter something.
@@ -2101,7 +2101,7 @@
     "Created: 17.11.1995 / 09:45:21 / cg"
 ! !
 
-!DialogBox class methodsFor:'multiple choice dialogs'!
+!DialogBox  class methodsFor:'multiple choice dialogs'!
 
 choose:aString fromList:list values:listValues buttons:buttonLabels values:buttonValues lines:maxLines cancel:cancelBlock
     "launch a Dialog showing the message and list.
@@ -4680,6 +4680,7 @@
     |helper component|
 
     helper := HorizontalPanelView new.
+    helper borderWidth:0.
 
     aCol do:[:el |
         component := aBlock value:el.
@@ -4762,8 +4763,8 @@
      dialog open.
     "
 
-    "Modified: 9.2.1996 / 22:28:14 / cg"
     "Created: 31.5.1996 / 20:45:31 / cg"
+    "Modified: 17.7.1996 / 12:06:08 / cg"
 ! !
 
 !DialogBox methodsFor:'explicit focus control'!
@@ -5083,9 +5084,9 @@
     ]
 ! !
 
-!DialogBox class methodsFor:'documentation'!
+!DialogBox  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.84 1996-06-14 23:26:49 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.85 1996-07-17 10:09:58 cg Exp $'
 ! !
 DialogBox initialize!
hg/stx-libwidg