Mercurial > emacs

comparison lisp/term/sun-mouse.el @ 42706:be541feb06cc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix typo.
author Pavel Janík <Pavel@Janik.cz>
date Sun, 13 Jan 2002 10:09:20 +0000
parents 45db352a0971
children 5ade352e8d1c
comparison
equal deleted inserted replaced
42705:963ac6b8fb83 42706:be541feb06cc
592 the FORM associated with the selected STRING is evaluated, 592 the FORM associated with the selected STRING is evaluated,
593 and the resulting value is returned. Generally these FORMs are 593 and the resulting value is returned. Generally these FORMs are
594 evaluated for their side-effects rather than their values. 594 evaluated for their side-effects rather than their values.
595 If the selected form is a menu or a symbol whose value is a menu, 595 If the selected form is a menu or a symbol whose value is a menu,
596 then it is displayed and evaluated as a pullright menu item. 596 then it is displayed and evaluated as a pullright menu item.
597 If the the FORM of the first ITEM is nil, the STRING of the item 597 If the FORM of the first ITEM is nil, the STRING of the item
598 is used as a label for the menu, i.e. it's inverted and not selectable." 598 is used as a label for the menu, i.e. it's inverted and not selectable."
599 599
600 (if (symbolp menu) (setq menu (symbol-value menu))) 600 (if (symbolp menu) (setq menu (symbol-value menu)))
601 (eval (sun-menu-internal *menu-window* *menu-x* *menu-y* 4 menu))) 601 (eval (sun-menu-internal *menu-window* *menu-x* *menu-y* 4 menu)))
602 602