diff options
Diffstat (limited to 'lisp/progmodes/prolog.el')
| -rw-r--r-- | lisp/progmodes/prolog.el | 14 |
1 files changed, 4 insertions, 10 deletions
diff --git a/lisp/progmodes/prolog.el b/lisp/progmodes/prolog.el index 75e95d9b904..a4e677ba41d 100644 --- a/lisp/progmodes/prolog.el +++ b/lisp/progmodes/prolog.el @@ -1292,8 +1292,7 @@ To find out what version of Prolog mode you are running, enter (setq-local shell-dirstack-query "pwd.") (setq-local compilation-error-regexp-alist prolog-inferior-error-regexp-alist) - (compilation-shell-minor-mode) - (prolog-inferior-menu)) + (compilation-shell-minor-mode)) (defun prolog-input-filter (str) (cond ((string-match "\\`\\s *\\'" str) nil) ;whitespace @@ -3378,9 +3377,6 @@ PREFIX is the prefix of the search regexp." (defun prolog-menu () "Add the menus for the Prolog editing buffers." - (easy-menu-add prolog-edit-menu-insert-move) - (easy-menu-add prolog-edit-menu-runtime) - ;; Add predicate index menu (setq-local imenu-create-index-function 'imenu-default-create-index-function) @@ -3391,9 +3387,7 @@ PREFIX is the prefix of the search regexp." (if (and prolog-imenu-flag (< (count-lines (point-min) (point-max)) prolog-imenu-max-lines)) - (imenu-add-to-menubar "Predicates")) - - (easy-menu-add prolog-menu-help)) + (imenu-add-to-menubar "Predicates"))) (easy-menu-define prolog-inferior-menu-all prolog-inferior-mode-map @@ -3436,8 +3430,8 @@ PREFIX is the prefix of the search regexp." "Create the menus for the Prolog inferior buffer. This menu is dynamically created because one may change systems during the life of an Emacs session." - (easy-menu-add prolog-inferior-menu-all) - (easy-menu-add prolog-menu-help)) + (declare (obsolete nil "28.1")) + nil) (defun prolog-mode-version () "Echo the current version of Prolog mode in the minibuffer." |