Add mode specification to commands, require Emacs 28

Author: minad

README.org

@@ -15,7 +15,7 @@ features:
 - Context-sensitive completion.
 - Inline display of Gnuplot plots.
 
-It is recommended to use GNU Emacs 25 or above, and Gnuplot version 5.0 or
+It is recommended to use GNU Emacs 28 or above, and Gnuplot version 5.0 or
 above.
 
 * Installation

gnuplot-context.el

@@ -2053,7 +2053,7 @@ there."
 
 (defun gnuplot-help-function ()
   "Pop up the extended documentation for the construction at point."
-  (interactive)
+  (interactive nil gnuplot-mode gnuplot-comint-mode)
   (gnuplot-context--parse-at-point nil)
   (if (and gnuplot-context--info-at-point gnuplot-eldoc-hash)
       (let ((eldoc
@@ -2063,7 +2063,7 @@ there."
 ;; Info lookup
 (defun gnuplot-info-at-point (&optional query)
   "Open the relevant gnuplot info page for the construction at point."
-  (interactive "P")
+  (interactive "P" gnuplot-mode gnuplot-comint-mode)
   (setq gnuplot-context--info-at-point nil)
   (unless query
     (gnuplot-context--parse-at-point nil))
@@ -2190,6 +2190,7 @@ summaries appear in the echo area as you type, toggle
 To choose whether to use this mode by default in Gnuplot buffers,
 customize the variable
 `gnuplot-use-context-sensitive-completion'."
+  :interactive (gnuplot-mode gnuplot-comint-mode)
   :keymap
   `((,(kbd "C-c C-/") . gnuplot-help-function)
     (,(kbd "C-c C-d") . gnuplot-info-at-point))

gnuplot-gui.el

@@ -796,7 +796,7 @@ This alist is formed at load time by appending together
                                     gnuplot-gui-test-type))
 
 (defun gnuplot-gui-swap-simple-complete ()
-  (interactive)
+  (interactive nil gnuplot-mode)
   (setq gnuplot-gui-plot-splot-fit-style
         (if (equal gnuplot-gui-plot-splot-fit-style 'complete)
             'simple 'complete))
@@ -825,7 +825,7 @@ This alist is formed at load time by appending together
 Determine contents of current line and set up the appropriate GUI
 frame.  Bound to \\[gnuplot-gui-set-options-and-insert]
 Note that \"cntrparam\" is not currently supported."
-  (interactive (list last-nonmenu-event))
+  (interactive (list last-nonmenu-event) gnuplot-mode)
   (save-excursion
     (if event (mouse-set-point event))
     (let ((begin  (gnuplot--point-at-beginning-of-command))
@@ -904,7 +904,7 @@ Note that \"cntrparam\" is not currently supported."
                   "%S is not a gnuplot command which takes options" w)))) ))))
 
 (defun gnuplot-gui-toggle-popup ()
-  (interactive)
+  (interactive nil gnuplot-mode)
   (setq gnuplot-gui-popup-flag (not gnuplot-gui-popup-flag))
   (message (if gnuplot-gui-popup-flag
                "Argument popup will appear after insertions."