Mercurial > hg > xemacs-beta

comparison lisp/packages/info.el @ 116:9f59509498e1 r20-1b10

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b10
author cvs
date Mon, 13 Aug 2007 09:23:06 +0200
parents 0d2f883870bc
children cca96a509cfe
comparison
equal deleted inserted replaced
115:f109f7dabbe2 116:9f59509498e1
1636 (list (if (equal val "") 1636 (list (if (equal val "")
1637 fn (intern val))))) 1637 fn (intern val)))))
1638 (save-window-excursion 1638 (save-window-excursion
1639 (info) 1639 (info)
1640 (condition-case nil 1640 (condition-case nil
1641 (Info-find-node "elisp" "Top") 1641 (Info-find-node "lispref" "Top")
1642 (error (Info-find-node "lispref" "Top"))) 1642 (error (Info-find-node "elisp" "Top")))
1643 (Info-index (symbol-name func))) 1643 (Info-index (symbol-name func)))
1644 (pop-to-buffer "*info*")) 1644 (pop-to-buffer "*info*"))
1645 1645
1646 (defun Info-reannotate-node () 1646 (defun Info-reannotate-node ()
1647 (let ((bufs (delq nil (mapcar 'get-file-buffer Info-annotations-path)))) 1647 (let ((bufs (delq nil (mapcar 'get-file-buffer Info-annotations-path))))