[Emacs-diffs] /srv/bzr/emacs/trunk r102180: Silence sieve-manage.el compilation.

[Glenn Morris]

------------------------------------------------------------
revno: 102180
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Sun 2010-10-31 18:38:04 -0700
message:
  Silence sieve-manage.el compilation.
  * lisp/gnus/sieve-manage.el: Require 'cl when compiling, for caddr.
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/sieve-manage.el

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2010-11-01 01:34:55 +0000
+++ b/lisp/gnus/ChangeLog       2010-11-01 01:38:04 +0000
@@ -1,5 +1,7 @@
 2010-11-01  Glenn Morris  <address@hidden>
 
+       * 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.

=== modified file 'lisp/gnus/sieve-manage.el'
--- a/lisp/gnus/sieve-manage.el 2010-10-11 23:29:33 +0000
+++ b/lisp/gnus/sieve-manage.el 2010-11-01 01:38:04 +0000
@@ -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 <address@hidden>
 
@@ -79,6 +79,7 @@
   (require 'password))
 
 (eval-when-compile
+  (require 'cl)                                ; caddr
   (require 'sasl)
   (require 'starttls))
 (autoload 'sasl-find-mechanism "sasl")