Mercurial > hg > xemacs-beta

comparison lisp/x11/x-menubar.el @ 193:f53b5ca2e663 r20-3b23

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b23
author cvs
date Mon, 13 Aug 2007 09:58:30 +0200
parents 489f57a838ef
children a2f645c6b9f8
comparison
equal deleted inserted replaced
192:9d35321dd38c 193:f53b5ca2e663
318 :selected (null temp-buffer-show-function)] 318 :selected (null temp-buffer-show-function)]
319 "-----" 319 "-----"
320 ["Make current frame gnuserv target" 320 ["Make current frame gnuserv target"
321 (setq gnuserv-frame 321 (setq gnuserv-frame
322 (if (equal gnuserv-frame (selected-frame)) 322 (if (equal gnuserv-frame (selected-frame))
323 nil 323 'new
324 (selected-frame))) 324 (selected-frame)))
325 :style radio 325 :style radio
326 :selected (equal gnuserv-frame (selected-frame))] 326 :selected (equal gnuserv-frame (selected-frame))]
327 ) 327 )
328 328