# HG changeset patch
# User Colin Walters <walters@gnu.org>
# Date 1011162800 0
# Node ID a7530850a26cebbaad7468b9f39942bec23e903b
# Parent  c3e528c6c110c7cdd995208369ba827597a1c06e
(toplevel): Require `cl' when compiling.

diff -r c3e528c6c110 -r a7530850a26c lisp/ibuf-macs.el
--- a/lisp/ibuf-macs.el	Wed Jan 16 02:47:15 2002 +0000
+++ b/lisp/ibuf-macs.el	Wed Jan 16 06:33:20 2002 +0000
@@ -1,11 +1,9 @@
 ;;; ibuf-macs.el --- macros for ibuffer
 
-;; Copyright (C) 2000, 2001 Free Software Foundation, Inc.
+;; Copyright (C) 2000, 2001, 2002 Free Software Foundation, Inc.
 
 ;; Author: Colin Walters <walters@verbum.org>
 ;; Created: 6 Dec 2001
-;; X-RCS: $Id: ibuf-macs.el,v 1.6 2001/12/11 22:47:09 walters Exp $
-;; URL: http://cvs.verbum.org/ibuffer
 ;; Keywords: buffer, convenience
 
 ;; This file is not currently part of GNU Emacs.
@@ -27,6 +25,9 @@
 
 ;;; Code:
 
+(eval-when-compile
+  (require 'cl))
+
 ;; From Paul Graham's "ANSI Common Lisp", adapted for Emacs Lisp here.
 (defmacro ibuffer-aif (test true-body &rest false-body)
   "Evaluate TRUE-BODY or FALSE-BODY depending on value of TEST.