changeset 111328:d3285b080feb

Silence compilation of mh-mime.el. * lisp/mh-e/mh-mime.el (dots, type, ov): Avoid unnecessary declaration.
author Glenn Morris <rgm@gnu.org>
date Tue, 02 Nov 2010 20:27:38 -0700
parents 27839df805b0
children be0bea620615
files lisp/mh-e/ChangeLog lisp/mh-e/mh-mime.el
diffstat 2 files changed, 10 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mh-e/ChangeLog	Tue Nov 02 23:25:36 2010 -0400
+++ b/lisp/mh-e/ChangeLog	Tue Nov 02 20:27:38 2010 -0700
@@ -1,3 +1,7 @@
+2010-11-03  Glenn Morris  <rgm@gnu.org>
+
+	* mh-mime.el (dots, type, ov): Avoid unnecessary declaration.
+
 2010-05-14  Peter S Galbraith  <psg@debian.org>
 
 	* mh-mime.el (mh-decode-message-subject): New function to decode
--- a/lisp/mh-e/mh-mime.el	Tue Nov 02 23:25:36 2010 -0400
+++ b/lisp/mh-e/mh-mime.el	Tue Nov 02 20:27:38 2010 -0700
@@ -1,8 +1,7 @@
 ;;; mh-mime.el --- MH-E MIME support
 
-;; Copyright (C) 1993, 1995,
-;;   2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010
-;;   Free Software Foundation, Inc.
+;; Copyright (C) 1993, 1995, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
+;;   2008, 2009, 2010  Free Software Foundation, Inc.
 
 ;; Author: Bill Wohler <wohler@newt.com>
 ;; Maintainer: Bill Wohler <wohler@newt.com>
@@ -837,9 +836,10 @@
 ;;; Button Display
 
 ;; Shush compiler.
-(defvar dots)                           ; XEmacs
-(defvar type)                           ; XEmacs
-(defvar ov)                             ; XEmacs
+(when (featurep 'xemacs)
+  (defvar dots)
+  (defvar type)
+  (defvar ov))
 
 (defun mh-insert-mime-button (handle index displayed)
   "Insert MIME button for HANDLE.
@@ -1834,5 +1834,4 @@
 ;; sentence-end-double-space: nil
 ;; End:
 
-;; arch-tag: 0dd36518-1b64-4a84-8f4e-59f422d3f002
 ;;; mh-mime.el ends here