CLIM mail archive

[Prev][Next][Index][Thread]

accepting-values in CLIM-2



Hello,

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,   repp@darmstadt.gmd.de,   (++49 6151) 869-265
German National Research Center for Computer Science (GMD)
Rheinstrasse 75, D-64295 Darmstadt, FRG


Main Index | Thread Index