Watch out for older XEmacsen for which requiring info-look doesn't

define info-lookup-maybe-add-help.
This commit is contained in:
Barry Warsaw 2002-04-30 18:58:52 +00:00
parent d268183044
commit 5dfc7afff9
1 changed files with 11 additions and 8 deletions

View File

@ -3123,14 +3123,17 @@ to newline-and-indent in the global keymap, and shadows them with
local bindings to py-newline-and-indent.")) local bindings to py-newline-and-indent."))
(require 'info-look) (require 'info-look)
(info-lookup-maybe-add-help ;; The info-look package does not always provide this function (it
;; appears this is the case with XEmacs 21.1)
(when (fboundp 'info-lookup-maybe-add-help)
(info-lookup-maybe-add-help
:mode 'python-mode :mode 'python-mode
:regexp "[a-zA-Z0-9_]+" :regexp "[a-zA-Z0-9_]+"
:doc-spec '(("(python-lib)Module Index") :doc-spec '(("(python-lib)Module Index")
("(python-lib)Class-Exception-Object Index") ("(python-lib)Class-Exception-Object Index")
("(python-lib)Function-Method-Variable Index") ("(python-lib)Function-Method-Variable Index")
("(python-lib)Miscellaneous Index"))) ("(python-lib)Miscellaneous Index")))
)
;; Helper functions ;; Helper functions