comparison lisp/progmodes/idlw-help.el @ 62772:f2892faa87d4

* progmodes/ada-mode.el (ada-mode): * progmodes/antlr-mode.el (antlr-mode): * progmodes/autoconf.el (autoconf-mode): * progmodes/dcl-mode.el (dcl-mode): * progmodes/delphi.el (delphi-mode): * progmodes/ebrowse.el (ebrowse-tree-mode) (ebrowse-electric-list-mode, ebrowse-member-mode) (ebrowse-electric-position-mode): * progmodes/f90.el (f90-mode): * progmodes/fortran.el (fortran-mode): * progmodes/icon.el (icon-mode): * progmodes/idlw-help.el (idlwave-help-mode): * progmodes/idlw-shell.el (idlwave-shell-mode): * progmodes/idlwave.el (idlwave-mode): * progmodes/inf-lisp.el (inferior-lisp-mode): * progmodes/m4-mode.el (m4-mode): * progmodes/meta-mode.el (metafont-mode, metapost-mode): * progmodes/modula2.el (modula-2-mode): * progmodes/octave-inf.el (inferior-octave-mode): * progmodes/octave-mod.el (octave-mode): * progmodes/pascal.el (pascal-mode): * progmodes/sh-script.el (sh-mode): * progmodes/sql.el (sql-mode, sql-interactive-mode): * progmodes/vhdl-mode.el (vhdl-mode): * progmodes/xscheme.el (scheme-interaction-mode): Use run-mode-hooks.
author Lute Kamstra <lute@gnu.org>
date Thu, 26 May 2005 16:39:28 +0000
parents 9d18baf82550
children 87216f91a211
comparison
equal deleted inserted replaced
62771:a0b0cf078b7b 62772:f2892faa87d4
276 " -%-")) 276 " -%-"))
277 (setq buffer-read-only t) 277 (setq buffer-read-only t)
278 (set (make-local-variable 'idlwave-help-def-pos) nil) 278 (set (make-local-variable 'idlwave-help-def-pos) nil)
279 (set (make-local-variable 'idlwave-help-args) nil) 279 (set (make-local-variable 'idlwave-help-args) nil)
280 (set (make-local-variable 'idlwave-help-in-header) nil) 280 (set (make-local-variable 'idlwave-help-in-header) nil)
281 (run-hooks 'idlwave-help-mode-hook)) 281 (run-mode-hooks 'idlwave-help-mode-hook))
282 282
283 (defun idlwave-html-help-location () 283 (defun idlwave-html-help-location ()
284 "Return the help directory where HTML files are, or nil if that is unknown." 284 "Return the help directory where HTML files are, or nil if that is unknown."
285 (or (and (stringp idlwave-html-help-location) 285 (or (and (stringp idlwave-html-help-location)
286 (> (length idlwave-html-help-location) 0) 286 (> (length idlwave-html-help-location) 0)