CLIM mail archive


accepting-values in CLIM-2


we are searching for the best way for an accepting-values menu with more than
one line of input. 
The way we did it in Dynamic Windows doesn't work.

(defun test-menu ()
  (let ((label "Menu Title")
        (answer (concatenate 'string "black &" (string #\return) "white"))
        (stream *query-io*))
    (accepting-values (stream :own-window nil :label label)
      (setq answer
	    (accept 'string
		    :stream stream :prompt " text "
		    :default answer))


Juergen Repp,,   (++49 6151) 869-265
German National Research Center for Computer Science (GMD)
Rheinstrasse 75, D-64295 Darmstadt, FRG

Main Index | Thread Index