diff options
| -rw-r--r-- | lisp/strokes.el | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lisp/strokes.el b/lisp/strokes.el index 293bdf0f369..694677ada0b 100644 --- a/lisp/strokes.el +++ b/lisp/strokes.el | |||
| @@ -1211,12 +1211,7 @@ the stroke as a character in some language." | |||
| 1211 | ;;\\{edit-strokes-mode-map}" | 1211 | ;;\\{edit-strokes-mode-map}" |
| 1212 | ;; (setq truncate-lines nil | 1212 | ;; (setq truncate-lines nil |
| 1213 | ;; auto-show-mode nil ; don't want problems here either | 1213 | ;; auto-show-mode nil ; don't want problems here either |
| 1214 | ;; mode-popup-menu edit-strokes-menu) ; what about extent-specific stuff? | 1214 | ;; mode-popup-menu edit-strokes-menu)) ; what about extent-specific stuff? |
| 1215 | ;; (and (featurep 'menubar) | ||
| 1216 | ;; current-menubar | ||
| 1217 | ;; (setq-local current-menubar | ||
| 1218 | ;; (copy-sequence current-menubar)) | ||
| 1219 | ;; (add-submenu nil edit-strokes-menu))) | ||
| 1220 | 1215 | ||
| 1221 | ;;(let ((map edit-strokes-mode-map)) | 1216 | ;;(let ((map edit-strokes-mode-map)) |
| 1222 | ;; (define-key map "<" 'beginning-of-buffer) | 1217 | ;; (define-key map "<" 'beginning-of-buffer) |