emacs: Don't fail if SLIME can't be found.

diff --git a/emacs b/emacs
index a9164a2dca5d0e9557ed5cfd43c417450307736e..965b643bb04e209f87205a638892c6e93881238e 100644 (file)
--- a/emacs
+++ b/emacs
@@ -453,8 +453,9 @@
 (add-hook 'lisp-interaction-mode-hook 'mdw-fontify-lispy t)
 (add-hook 'slime-repl-mode-hook 'mdw-fontify-lispy t)
 (add-hook 'lisp-mode-hook 'mdw-common-lisp-indent t)
 (add-hook 'lisp-interaction-mode-hook 'mdw-fontify-lispy t)
 (add-hook 'slime-repl-mode-hook 'mdw-fontify-lispy t)
 (add-hook 'lisp-mode-hook 'mdw-common-lisp-indent t)

-(require 'slime)
-(slime-setup :autodoc t)
+(trap
+  (require 'slime)
+  (slime-setup :autodoc t))

 (trap (require 'xscheme))
 (setq-default xscheme-process-command-line "scheme -large -emacs")
 (add-hook 'inferior-lisp-mode-hook
 (trap (require 'xscheme))
 (setq-default xscheme-process-command-line "scheme -large -emacs")
 (add-hook 'inferior-lisp-mode-hook