Skip to content

Commit 9d538c8

Browse files
committed
Remove obsolete gnuplot-info-hook
1 parent 72e70e3 commit 9d538c8

File tree

2 files changed

+1
-55
lines changed

2 files changed

+1
-55
lines changed

gnuplot.el

Lines changed: 1 addition & 51 deletions
Original file line numberDiff line numberDiff line change
@@ -123,50 +123,6 @@ region, a buffer, or a file."
123123
:group 'gnuplot-hooks
124124
:type 'hook)
125125

126-
(defcustom gnuplot-info-hook nil
127-
"Hook run before setting up the info-look interface.
128-
This hook is necessary to handle inconsistencies in versions of and
129-
sources of the gnuplot info file. If Gnuplot-mode can find the info
130-
file generated from the 3.6beta patchlevel 347 (or later) release of
131-
Gnuplot, then this hook probably is not necessary. Some versions of
132-
the info file may have a General Index session, which can be used by
133-
info-look. In that case the following (or something similar with the
134-
value of `info-lookup-symbol-alist' altered appropriately) should be
135-
placed in the .emacs file.
136-
137-
Emacs version 20.2 ships with a different version of info-look that
138-
does 20.3. If you use any version of Emacs 19, you must use the
139-
version from 20.2. Any version of XEmacs 20 or 21 should use the
140-
version from 20.3 but can use either. XEmacs 19 should use the
141-
version 20.2.
142-
143-
For the newer version of info-look, do this:
144-
145-
(add-hook \'gnuplot-info-hook
146-
\'(lambda ()
147-
(let ((elem (assoc \'gnuplot-mode info-lookup-alist)))
148-
(delete elem info-lookup-alist)
149-
(info-lookup-maybe-add-help
150-
:mode 'gnuplot-mode :topic 'symbol
151-
:regexp \"[a-zA-Z][_a-zA-Z0-9]*\"
152-
:doc-spec '((\"(gnuplot)General Index\" nil
153-
\"[_a-zA-Z0-9]+\"))))))
154-
155-
For the older version of info-look, do this:
156-
157-
(add-hook \'gnuplot-info-hook
158-
\'(lambda ()
159-
(let ((elem (assoc \'gnuplot-mode info-lookup-alist)))
160-
(delete elem info-lookup-alist)
161-
(setq info-lookup-alist
162-
(append info-lookup-alist
163-
\'((gnuplot-mode
164-
\"[a-zA-Z][_a-zA-Z0-9]*\" nil
165-
((\"(gnuplot)General Index\" nil
166-
\"[_a-zA-Z0-9]+\" )))))))))"
167-
:group 'gnuplot-hooks
168-
:type 'hook)
169-
170126
;; comint hook suggested by <DB>
171127
(defcustom gnuplot-comint-setup-hook nil
172128
"Hook run after setting up the gnuplot buffer in comint mode.
@@ -1860,8 +1816,7 @@ Negatable options are defined in `gnuplot-keywords-negatable-options'."
18601816
"Setup info-look in the gnuplot buffer.
18611817
18621818
Also set the variable `gnuplot-keywords' and do something sensible if
1863-
info-look was not available.
1864-
See the comments in `gnuplot-info-hook'."
1819+
info-look was not available."
18651820
(interactive)
18661821
(setq gnuplot-keywords-pending nil)
18671822
;; TODO Update info layout
@@ -1879,11 +1834,6 @@ See the comments in `gnuplot-info-hook'."
18791834
:regexp "[a-zA-Z][_a-zA-Z0-9]*"
18801835
:doc-spec doc-spec))
18811836

1882-
;; TODO Clean this up
1883-
;; this hook is my best way of working with info-look and
1884-
;; allowing multiple versions of the gnuplot-info file.
1885-
;; yes, this is a hassle.
1886-
(run-hooks 'gnuplot-info-hook)
18871837
(let ((there (bufferp (get-buffer "*info*"))))
18881838
(info-lookup-setup-mode 'symbol 'gnuplot-mode)
18891839
(or there (and (get-buffer "*info*") (kill-buffer "*info*")))

gpelcard.tex

Lines changed: 0 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,3 @@
1-
21
%% Time-stamp: <2011-09-13 10:22:26 bruce>
32

43
%% This document is copyright (C) 1998-2002, 2011 Bruce Ravel
@@ -328,9 +327,6 @@
328327
%
329328
\variable{gnuplot-comint-setup-hook}{nil}{Functions run after setting
330329
up the gnuplot process buffer in comint mode.}
331-
%
332-
\variable{gnuplot-info-hook}{nil}{Functions run before setting up
333-
info-look in the gnuplot-mode buffer.}
334330

335331

336332

0 commit comments

Comments
 (0)