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
:mode 'python-mode ;; appears this is the case with XEmacs 21.1)
:regexp "[a-zA-Z0-9_]+" (when (fboundp 'info-lookup-maybe-add-help)
:doc-spec '(("(python-lib)Module Index") (info-lookup-maybe-add-help
("(python-lib)Class-Exception-Object Index") :mode 'python-mode
("(python-lib)Function-Method-Variable Index") :regexp "[a-zA-Z0-9_]+"
("(python-lib)Miscellaneous Index"))) :doc-spec '(("(python-lib)Module Index")
("(python-lib)Class-Exception-Object Index")
("(python-lib)Function-Method-Variable Index")
("(python-lib)Miscellaneous Index")))
)
;; Helper functions ;; Helper functions