mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Make a redundant idlwave variable obsolete

Browse source 
* lisp/progmodes/idlw-help.el (idlwave-help-browse-url-available):
Make obsolete.
(idlwave-help-check-locations): Don't use above variable.
This commit is contained in:
Stefan Kangas 2021-09-16 11:48:08 +02:00
parent b049f373ef
commit 8a55d10629
1 changed files with 3 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lisp/progmodes/idlw-help.el
View file

@ -37,10 +37,7 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; Code:
(defvar idlwave-help-browse-url-available t
"Whether browse-url is available.")
(require 'browse-url)
@ -332,9 +329,7 @@ Here are all keybindings.
(when (and idlwave-help-use-assistant
(not (eq (idlwave-help-assistant-available) t)))
(message "Cannot locate IDL Assistant, enabling default browser.")
(setq idlwave-help-use-assistant nil)
(unless idlwave-help-browse-url-available
(error "browse-url is not available; install it or IDL Assistant to use HTML help")))))
(setq idlwave-help-use-assistant nil))))
(defvar idlwave-current-obj_new-class)
@ -1354,6 +1349,8 @@ IDL assistant.")
(setq idlwave-help-assistant-socket nil
idlwave-help-assistant-process nil)))
(defvar idlwave-help-browse-url-available t)
(make-obsolete-variable 'idlwave-help-browse-url-available nil "28.1")
(provide 'idlw-help)
(provide 'idlwave-help)