projects
/
elisp
/
gnus.git-
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Importing Pterodactyl Gnus v0.91.
[elisp/gnus.git-]
/
lisp
/
gnus-vm.el
diff --git
a/lisp/gnus-vm.el
b/lisp/gnus-vm.el
index
6fe4b26
..
c611582
100644
(file)
--- a/
lisp/gnus-vm.el
+++ b/
lisp/gnus-vm.el
@@
-36,6
+36,7
@@
(require 'gnus-msg)
(eval-when-compile
(require 'gnus-msg)
(eval-when-compile
+ (require 'cl)
(autoload 'vm-mode "vm")
(autoload 'vm-save-message "vm")
(autoload 'vm-forward-message "vm")
(autoload 'vm-mode "vm")
(autoload 'vm-save-message "vm")
(autoload 'vm-forward-message "vm")
@@
-46,11
+47,10
@@
"Inhibit loading `win-vm' if using a window-system.
Has to be set before gnus-vm is loaded.")
"Inhibit loading `win-vm' if using a window-system.
Has to be set before gnus-vm is loaded.")
-(or gnus-vm-inhibit-window-system
- (condition-case nil
- (when window-system
- (require 'win-vm))
- (error nil)))
+(unless gnus-vm-inhibit-window-system
+ (ignore-errors
+ (when window-system
+ (require 'win-vm))))
(when (not (featurep 'vm))
(load "vm"))
(when (not (featurep 'vm))
(load "vm"))