mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

Remove unnecessary eval-when-compiles.

Browse Source
This commit is contained in:
Glenn Morris 2008-06-07 02:35:02 +00:00
parent 8705576eab
commit 07da87e9ab
6 changed files with 19 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/erc/ChangeLog
View File

@ -1,3 +1,8 @@
2008-06-07 Glenn Morris <rgm@gnu.org>
* erc/erc-autoaway.el, erc/erc-ibuffer.el, erc/erc-menu.el:
* erc/erc-stamp.el, erc/erc.el: Remove unnecessary eval-when-compiles.
2008-05-05 Juanma Barranquero <lekktu@gmail.com>
* erc-goodies.el (erc-noncommands-list, noncommands)

5
lisp/erc/erc-autoaway.el
View File

@ -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 @@ This is only used when `erc-autoaway-idle-method' is set to 'emacs.")
"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.

6
lisp/erc/erc-ibuffer.el
View File

@ -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)

7
lisp/erc/erc-menu.el
View File

@ -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 @@ ERC menu yet.")
(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."

6
lisp/erc/erc-stamp.el
View File

@ -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 @@ property to get to the POSth column."
(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.

5
lisp/erc/erc.el
View File

@ -3367,9 +3367,8 @@ the message given by REASON."
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."