From 059fc5111dff2fbc589af60d35e314adfea8211b Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Tue, 15 Jan 2013 21:46:25 -0500 Subject: [PATCH] * lisp/gnus/smiley.el (smiley-style): Make the file loadable in batch mode. Not likely to be very useful, of course, but helps with automated testing. --- lisp/gnus/ChangeLog | 4 ++++ lisp/gnus/smiley.el | 5 ++++- 2 files changed, 8 insertions(+), 1 deletion(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 733f1d26510..1f1b46c8532 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,7 @@ +2013-01-16 Glenn Morris + + * smiley.el (smiley-style): Make the file loadable in batch mode. + 2013-01-15 Stefan Monnier * nnimap.el (nnimap-keepalive): Don't throw an error if there's no more diff --git a/lisp/gnus/smiley.el b/lisp/gnus/smiley.el index 6381f5bf9d9..eb71134457c 100644 --- a/lisp/gnus/smiley.el +++ b/lisp/gnus/smiley.el @@ -59,7 +59,10 @@ (defcustom smiley-style (if (or (and (fboundp 'face-attribute) - (>= (face-attribute 'default :height) 160)) + ;; In batch mode, attributes can be unspecified. + (condition-case nil + (>= (face-attribute 'default :height) 160) + (error nil))) (and (fboundp 'face-height) (>= (face-height 'default) 14))) 'medium -- 2.11.4.GIT