From 1d8ff0c63c17d4d1c723936c57c37342ddd9d145 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Sun, 31 Oct 2010 18:38:04 -0700 Subject: [PATCH] Silence sieve-manage.el compilation. * lisp/gnus/sieve-manage.el: Require 'cl when compiling, for caddr. --- lisp/gnus/ChangeLog | 2 ++ lisp/gnus/sieve-manage.el | 5 +++-- 2 files changed, 5 insertions(+), 2 deletions(-) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 31b7e5d4217..9cc8462e12b 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,5 +1,7 @@ 2010-11-01 Glenn Morris + * sieve-manage.el: Require 'cl when compiling. + * gnus-util.el (iswitchb-read-buffer): Declare rather than autoload. (gnus-iswitchb-completing-read): Require iswitchb. (gnus-select-frame-set-input-focus): Silence compiler. diff --git a/lisp/gnus/sieve-manage.el b/lisp/gnus/sieve-manage.el index 5b5439fab73..a3647061d15 100644 --- a/lisp/gnus/sieve-manage.el +++ b/lisp/gnus/sieve-manage.el @@ -1,7 +1,7 @@ ;;; sieve-manage.el --- Implementation of the managesive protocol in elisp -;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, -;; 2008, 2009, 2010 Free Software Foundation, Inc. +;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, +;; 2010 Free Software Foundation, Inc. ;; Author: Simon Josefsson @@ -79,6 +79,7 @@ (require 'password)) (eval-when-compile + (require 'cl) ; caddr (require 'sasl) (require 'starttls)) (autoload 'sasl-find-mechanism "sasl") -- 2.39.5