Mercurial > emacs
changeset 104035:2a920253454b
(cl-compiling-file): Update for the name-change `outbuffer' to
`bytecomp-outbuffer'.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Thu, 23 Jul 2009 02:54:15 +0000 |
| parents | d2b52a0cf462 |
| children | 1a42628a650e |
| files | lisp/emacs-lisp/cl.el |
| diffstat | 1 files changed, 5 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/cl.el Thu Jul 23 02:54:00 2009 +0000 +++ b/lisp/emacs-lisp/cl.el Thu Jul 23 02:54:15 2009 +0000 @@ -1,7 +1,7 @@ ;;; cl.el --- Common Lisp extensions for Emacs -;; Copyright (C) 1993, 2001, 2002, 2003, 2004, 2005, -;; 2006, 2007, 2008, 2009 Free Software Foundation, Inc. +;; Copyright (C) 1993, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, +;; 2009 Free Software Foundation, Inc. ;; Author: Dave Gillespie <daveg@synaptics.com> ;; Version: 2.02 @@ -272,8 +272,9 @@ (defvar cl-compiling-file nil) (defun cl-compiling-file () (or cl-compiling-file - (and (boundp 'outbuffer) (bufferp (symbol-value 'outbuffer)) - (equal (buffer-name (symbol-value 'outbuffer)) + (and (boundp 'bytecomp-outbuffer) + (bufferp (symbol-value 'bytecomp-outbuffer)) + (equal (buffer-name (symbol-value 'bytecomp-outbuffer)) " *Compiler Output*")))) (defvar cl-proclaims-deferred nil)