branch: externals/idlwave
commit e129ebc0ef81eb54dcbd59ced5a04cf1ea0271fd
Author: jdsmith <jdsmith>
Commit: jdsmith <jdsmith>
Cleaned up speedbar `require' to support XEmacs, which doesn't like a 3
argument form.
---
idlwave.el | 11 +++++++----
1 file changed, 7 insertions(+), 4 deletions(-)
diff --git a/idlwave.el b/idlwave.el
index 901e22b59b..e919970132 100644
--- a/idlwave.el
+++ b/idlwave.el
@@ -5,7 +5,7 @@
;; Chris Chase <ch...@att.com>
;; Maintainer: J.D. Smith <jdsm...@alum.mit.edu>
;; Version: VERSIONTAG
-;; Date: $Date: 2002/01/11 23:39:25 $
+;; Date: $Date: 2002/01/14 22:44:01 $
;; Keywords: languages
;; This file is part of GNU Emacs.
@@ -7894,9 +7894,12 @@ This function was written since `list-abbrevs' looks
terrible for IDLWAVE mode."
(set-buffer "*Help*")
(setq truncate-lines t)))
-;; Add .pro files to speedbar for support, if available
-(if (require 'speedbar nil t)
- (speedbar-add-supported-extension ".pro"))
+;; Add .pro files to speedbar for support, catching errors
+(condition-case nil
+ (progn
+ (require 'speedbar)
+ (speedbar-add-supported-extension ".pro"))
+ (error nil))
;; Try to load online help, but catch any errors.
(condition-case nil
