Mercurial > hg > xemacs-beta

comparison lisp/info.el @ 456:e7ef97881643 r21-2-43

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-43
author cvs
date Mon, 13 Aug 2007 11:41:24 +0200
parents 1ccc32a20af4
children 7039e6323819
comparison
equal deleted inserted replaced
455:5b97c1cd6ed0 456:e7ef97881643
2428 (setq val (completing-read 2428 (setq val (completing-read
2429 (format "Look up Emacs Lisp function%s: " 2429 (format "Look up Emacs Lisp function%s: "
2430 (if fn 2430 (if fn
2431 (format " (default %s)" fn) 2431 (format " (default %s)" fn)
2432 "")) 2432 ""))
2433 obarray 'fboundp t)) 2433 obarray 'fboundp t
2434 nil nil (and fn (symbol-name fn))))
2434 (list (if (equal val "") 2435 (list (if (equal val "")
2435 fn (intern val))))) 2436 fn (intern val)))))
2436 (save-window-excursion 2437 (save-window-excursion
2437 (info) 2438 (info)
2438 (condition-case nil 2439 (condition-case nil