Mercurial > emacs
changeset 95614:b52fd6b0e051
Remove unnecessary eval-when-compiles.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Sat, 07 Jun 2008 02:34:54 +0000 |
| parents | 7e79847f2451 |
| children | b016dacb2e0b |
| files | lisp/erc/erc-autoaway.el lisp/erc/erc-ibuffer.el lisp/erc/erc-menu.el lisp/erc/erc-stamp.el lisp/erc/erc.el |
| diffstat | 5 files changed, 14 insertions(+), 15 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/erc/erc-autoaway.el Sat Jun 07 02:34:01 2008 +0000 +++ b/lisp/erc/erc-autoaway.el Sat Jun 07 02:34:54 2008 +0000 @@ -1,6 +1,7 @@ ;;; erc-autoaway.el --- Provides autoaway for ERC -;; Copyright (C) 2002, 2003, 2004, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 2002, 2003, 2004, 2006, 2007, 2008 +;; Free Software Foundation, Inc. ;; Author: Jorgen Schaefer <forcer@forcix.cx> ;; URL: http://www.emacswiki.org/cgi-bin/wiki.pl?ErcAutoAway @@ -45,7 +46,7 @@ "Indicates whether this module was responsible for setting the user's away status.") -(eval-when-compile (defvar erc-autoaway-idle-seconds)) +(defvar erc-autoaway-idle-seconds) (defun erc-autoaway-reestablish-idletimer () "Reestablish the Emacs idletimer.
--- a/lisp/erc/erc-ibuffer.el Sat Jun 07 02:34:01 2008 +0000 +++ b/lisp/erc/erc-ibuffer.el Sat Jun 07 02:34:54 2008 +0000 @@ -1,6 +1,7 @@ ;;; erc-ibuffer.el --- ibuffer integration with ERC -;; Copyright (C) 2002, 2004, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 2002, 2004, 2006, 2007, 2008 +;; Free Software Foundation, Inc. ;; Author: Mario Lang <mlang@delysid.org> ;; Keywords: comm @@ -70,8 +71,7 @@ erc-session-server))))) ;; Silence the byte-compiler -(eval-when-compile - (defvar erc-modified-channels-alist)) +(defvar erc-modified-channels-alist) (define-ibuffer-column erc-modified (:name "M") (if (and (boundp 'erc-track-mode)
--- a/lisp/erc/erc-menu.el Sat Jun 07 02:34:01 2008 +0000 +++ b/lisp/erc/erc-menu.el Sat Jun 07 02:34:54 2008 +0000 @@ -1,7 +1,7 @@ ;; erc-menu.el -- Menu-bar definitions for ERC -;; Copyright (C) 2001, 2002, 2004, 2005, 2006, -;; 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 2001, 2002, 2004, 2005, 2006, 2007, +;; 2008 Free Software Foundation, Inc. ;; Author: Mario Lang <mlang@delysid.org> ;; Keywords: comm, processes, menu @@ -129,8 +129,7 @@ (message "You might have to restart Emacs to remove the ERC menu")))) ;; silence byte-compiler warning -(eval-when-compile - (defvar erc-menu nil)) +(defvar erc-menu) (defun erc-menu-add () "Add the ERC menu to the current buffer."
--- a/lisp/erc/erc-stamp.el Sat Jun 07 02:34:01 2008 +0000 +++ b/lisp/erc/erc-stamp.el Sat Jun 07 02:34:54 2008 +0000 @@ -1,6 +1,7 @@ ;;; erc-stamp.el --- Timestamping for ERC messages -;; Copyright (C) 2002, 2003, 2004, 2006, 2007, 2008 Free Software Foundation, Inc. +;; Copyright (C) 2002, 2003, 2004, 2006, 2007, 2008 +;; Free Software Foundation, Inc. ;; Author: Mario Lang <mlang@delysid.org> ;; Keywords: comm, processes, timestamp @@ -263,8 +264,7 @@ (insert string)) ;; Silence byte-compiler -(eval-when-compile - (defvar erc-fill-column)) +(defvar erc-fill-column) (defun erc-insert-timestamp-right (string) "Insert timestamp on the right side of the screen.
--- a/lisp/erc/erc.el Sat Jun 07 02:34:01 2008 +0000 +++ b/lisp/erc/erc.el Sat Jun 07 02:34:54 2008 +0000 @@ -3367,9 +3367,8 @@ t) (put 'erc-cmd-SERVER 'process-not-needed t) -(eval-when-compile - (defvar motif-version-string) - (defvar gtk-version-string)) +(defvar motif-version-string) +(defvar gtk-version-string) (defun erc-cmd-SV () "Say the current ERC and Emacs version into channel."