Charles G Waldman <cgw(a)fnal.gov> writes:
Adrian Aichner writes:
> >>>>> "Charles" == Charles G Waldman <cgw(a)fnal.gov>
writes:
>
> Charles> Has anybody noticed that this function doesn't work in
> Charles> 21.1 (patch 8) "Bryce Canyon"?
>
> Charles> For instance if I type
>
> Charles> C-h a test RET
>
> Charles> the first entry in the list of "Functions and Macros" is
> Charles> add-latest-path
>
> Charles> If I click mouse-2 on this link, I get the right doc
> Charles> opened up in a bottom window. But within this doc
> Charles> window, the following of links does not seem to work.
>
> For me it works on both instances of `load-path', but not on
> `default-load-path'.
>
> I think this is because `default-load-path' does not exist as a
> variable.
Very odd. For me it doesn't work on either `load-path' or
`default-load-path'.
I tried running with -q and saw the same behaviour.
I doesn't work for me, neither. Here's the patch to fix it.
If you type RET or click mouse-2 at wrong place, it will get
documentation of nil. I think it's acceptable since you
also get nil when you type RET at empty line in
Hyper-Apropos buffer.
2000-01-05 Yoshiki Hayashi <t90553(a)mail.ecc.u-tokyo.ac.jp>
* hyper-apropos.el (hyper-apropos-this-symbol): Don't always
get symbol at point-min.
Index: hyper-apropos.el
===================================================================
RCS file: /usr/CVSroot/XEmacs/xemacs/lisp/hyper-apropos.el,v
retrieving revision 1.5.2.5
diff -u -r1.5.2.5 hyper-apropos.el
--- hyper-apropos.el 1999/12/24 09:24:31 1.5.2.5
+++ hyper-apropos.el 2000/01/05 10:48:36
@@ -1085,12 +1085,13 @@
nil
(forward-char 3)
(read (point-marker))))
- ((and
- (eq major-mode 'hyper-apropos-help-mode)
- (> (point) (point-min)))
- (save-excursion
- (goto-char (point-min))
- (hyper-apropos-this-symbol)))
+ ;; What's this? This ends up in the same symbol already described.
+;; ((and
+;; (eq major-mode 'hyper-apropos-help-mode)
+;; (> (point) (point-min)))
+;; (save-excursion
+;; (goto-char (point-min))
+;; (hyper-apropos-this-symbol)))
(t
(let* ((st (progn
(skip-syntax-backward "w_")
--
Yoshiki Hayashi