Mercurial > hg > xemacs-beta

comparison lisp/hyperbole/kotl/kmenu.el @ 24:4103f0995bd7 r19-15b95

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b95
author cvs
date Mon, 13 Aug 2007 08:51:03 +0200
parents 376386a54a3c
children c53a95d3c46d
comparison
equal deleted inserted replaced
23:0edd3412f124 24:4103f0995bd7
7 ;; 7 ;;
8 ;; AUTHOR: Bob Weiner 8 ;; AUTHOR: Bob Weiner
9 ;; ORG: Motorola, Inc., PPG 9 ;; ORG: Motorola, Inc., PPG
10 ;; 10 ;;
11 ;; ORIG-DATE: 28-Mar-94 at 11:22:09 11 ;; ORIG-DATE: 28-Mar-94 at 11:22:09
12 ;; LAST-MOD: 26-Oct-95 at 18:47:41 by Bob Weiner 12 ;; LAST-MOD: 22-Oct-96 at 01:30:50 by Bob Weiner
13 ;; 13 ;;
14 ;; Copyright (C) 1994-1995 Free Software Foundation, Inc. 14 ;; Copyright (C) 1994-1995 Free Software Foundation, Inc.
15 ;; 15 ;;
16 ;; This file is part of Hyperbole. 16 ;; This file is part of Hyperbole.
17 ;; 17 ;;
24 24
25 ;;; This definition is used by InfoDock only. 25 ;;; This definition is used by InfoDock only.
26 (defconst id-menubar-kotl 26 (defconst id-menubar-kotl
27 '( 27 '(
28 ("Koutline" 28 ("Koutline"
29 ["All-Cells-Attributes" (kotl-modecell-help nil -1) t] 29 ["All-Cells-Attributes" (kotl-mode:cell-help nil -1) t]
30 ["Help" describe-mode t] 30 ["Help" describe-mode t]
31 ["Manual" (id-info "(hyperbole.info)Outliner") t] 31 ["Manual" (id-info "(hyperbole.info)Outliner") t]
32 "----" 32 "----"
33 ["Find (Open)" find-file t] 33 ["Find (Open)" find-file t]
34 ["Find-Read-Only" find-file-read-only t] 34 ["Find-Read-Only" find-file-read-only t]
99 ["Copy-to-Buffer" kotl-mode:copy-to-buffer t] 99 ["Copy-to-Buffer" kotl-mode:copy-to-buffer t]
100 ["Demote" kotl-mode:demote-tree t] 100 ["Demote" kotl-mode:demote-tree t]
101 ["Kill" kotl-mode:kill-tree t] 101 ["Kill" kotl-mode:kill-tree t]
102 ["Mail" kotl-mode:mail-tree t] 102 ["Mail" kotl-mode:mail-tree t]
103 ["Promote" kotl-mode:promote-tree t] 103 ["Promote" kotl-mode:promote-tree t]
104 ["Show-Attributes" (kotl-modecell-help nil 2) t] 104 ["Show-Attributes" (kotl-mode:cell-help nil 2) t]
105 "----" 105 "----"
106 ["Copy-After-Cell" kotl-mode:copy-after t] 106 ["Copy-After-Cell" kotl-mode:copy-after t]
107 ["Copy-Before-Cell" kotl-mode:copy-before t] 107 ["Copy-Before-Cell" kotl-mode:copy-before t]
108 ["Move-After-Cell" kotl-mode:move-after t] 108 ["Move-After-Cell" kotl-mode:move-after t]
109 ["Move-Before-Cell" kotl-mode:move-before t] 109 ["Move-Before-Cell" kotl-mode:move-before t]
111 ("View" 111 ("View"
112 ["Set-View-Spec" kvspec:activate t] 112 ["Set-View-Spec" kvspec:activate t]
113 ["Toggle-Blank-Lines" kvspec:toggle-blank-lines t] 113 ["Toggle-Blank-Lines" kvspec:toggle-blank-lines t]
114 "----" 114 "----"
115 ["Set-Cell-Attribute" kotl-mode:set-cell-attribute t] 115 ["Set-Cell-Attribute" kotl-mode:set-cell-attribute t]
116 ["Show-Cell-Attributes" (kotl-modecell-help) t] 116 ["Show-Cell-Attributes" (kotl-mode:cell-help) t]
117 ["All-Cells-Attributes" (kotl-modecell-help nil -1) t] 117 ["All-Cells-Attributes" (kotl-mode:cell-help nil -1) t]
118 ["Show-Tree-Attributes" (kotl-modecell-help nil 2) t] 118 ["Show-Tree-Attributes" (kotl-mode:cell-help nil 2) t]
119 "----" 119 "----"
120 ["Hide (Collapse)" kotl-mode:hide-tree t] 120 ["Hide (Collapse)" kotl-mode:hide-tree t]
121 ["Hide-Levels" kotl-mode:hide-sublevels t] 121 ["Hide-Levels" kotl-mode:hide-sublevels t]
122 ["Hide-Subtree" kotl-mode:hide-subtree t] 122 ["Hide-Subtree" kotl-mode:hide-subtree t]
123 ["Overview" kotl-mode:overview t] 123 ["Overview" kotl-mode:overview t]
130 )) 130 ))
131 131
132 ;;; This definition is used by InfoDock and XEmacs. 132 ;;; This definition is used by InfoDock and XEmacs.
133 (defconst id-popup-kotl-menu 133 (defconst id-popup-kotl-menu
134 '("Koutline" 134 '("Koutline"
135 ["All-Cells-Attributes" (kotl-modecell-help nil -1) t] 135 ["All-Cells-Attributes" (kotl-mode:cell-help nil -1) t]
136 ["Help" describe-mode t] 136 ["Help" describe-mode t]
137 ["Manual" (id-info "(hyperbole.info)Outliner") t] 137 ["Manual" (id-info "(hyperbole.info)Outliner") t]
138 "----" 138 "----"
139 ("Edit" 139 ("Edit"
140 ["Set-Cell-Attribute" kotl-mode:set-cell-attribute t] 140 ["Set-Cell-Attribute" kotl-mode:set-cell-attribute t]
197 ["Copy-to-Buffer" kotl-mode:copy-to-buffer t] 197 ["Copy-to-Buffer" kotl-mode:copy-to-buffer t]
198 ["Demote" kotl-mode:demote-tree t] 198 ["Demote" kotl-mode:demote-tree t]
199 ["Kill" kotl-mode:kill-tree t] 199 ["Kill" kotl-mode:kill-tree t]
200 ["Mail" kotl-mode:mail-tree t] 200 ["Mail" kotl-mode:mail-tree t]
201 ["Promote" kotl-mode:promote-tree t] 201 ["Promote" kotl-mode:promote-tree t]
202 ["Show-Attributes" (kotl-modecell-help nil 2) t] 202 ["Show-Attributes" (kotl-mode:cell-help nil 2) t]
203 "----" 203 "----"
204 ["Copy-After-Cell" kotl-mode:copy-after t] 204 ["Copy-After-Cell" kotl-mode:copy-after t]
205 ["Copy-Before-Cell" kotl-mode:copy-before t] 205 ["Copy-Before-Cell" kotl-mode:copy-before t]
206 ["Move-After-Cell" kotl-mode:move-after t] 206 ["Move-After-Cell" kotl-mode:move-after t]
207 ["Move-Before-Cell" kotl-mode:move-before t] 207 ["Move-Before-Cell" kotl-mode:move-before t]
209 ("View" 209 ("View"
210 ["Set-View-Spec" kvspec:activate t] 210 ["Set-View-Spec" kvspec:activate t]
211 ["Toggle-Blank-Lines" kvspec:toggle-blank-lines t] 211 ["Toggle-Blank-Lines" kvspec:toggle-blank-lines t]
212 "----" 212 "----"
213 ["Set-Cell-Attribute" kotl-mode:set-cell-attribute t] 213 ["Set-Cell-Attribute" kotl-mode:set-cell-attribute t]
214 ["Show-Cell-Attributes" (kotl-modecell-help) t] 214 ["Show-Cell-Attributes" (kotl-mode:cell-help) t]
215 ["All-Cells-Attributes" (kotl-modecell-help nil -1) t] 215 ["All-Cells-Attributes" (kotl-mode:cell-help nil -1) t]
216 ["Show-Tree-Attributes" (kotl-modecell-help nil 2) t] 216 ["Show-Tree-Attributes" (kotl-mode:cell-help nil 2) t]
217 "----" 217 "----"
218 ["Hide (Collapse)" kotl-mode:hide-tree t] 218 ["Hide (Collapse)" kotl-mode:hide-tree t]
219 ["Hide-Levels" kotl-mode:hide-sublevels t] 219 ["Hide-Levels" kotl-mode:hide-sublevels t]
220 ["Hide-Subtree" kotl-mode:hide-subtree t] 220 ["Hide-Subtree" kotl-mode:hide-subtree t]
221 ["Overview" kotl-mode:overview t] 221 ["Overview" kotl-mode:overview t]