From: Glenn Morris Date: Sun, 3 Oct 2010 02:01:07 +0000 (-0700) Subject: * lisp/gnus/gmm-utils.el (gmm-write-region): Drop Emacs 20 compat cruft. X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~46^2~231 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4ec3f7cf3586bcfbf7a983894099f778532dd8de;p=emacs.git * lisp/gnus/gmm-utils.el (gmm-write-region): Drop Emacs 20 compat cruft. --- diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 3a8f3dac83c..b9beeb3aede 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,5 +1,7 @@ 2010-10-03 Glenn Morris + * gmm-utils.el (gmm-write-region): Drop Emacs 20 compat cruft. + * gnus-util.el (gnus-make-local-hook): Simplify. 2010-10-02 Julien Danjou diff --git a/lisp/gnus/gmm-utils.el b/lisp/gnus/gmm-utils.el index b76db479dfb..e16fc5efa63 100644 --- a/lisp/gnus/gmm-utils.el +++ b/lisp/gnus/gmm-utils.el @@ -1,6 +1,7 @@ ;;; gmm-utils.el --- Utility functions for Gnus, Message and MML -;; Copyright (C) 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. +;; Copyright (C) 2006, 2007, 2008, 2009, 2010 +;; Free Software Foundation, Inc. ;; Author: Reiner Steib ;; Keywords: news @@ -411,12 +412,9 @@ If mode is nil, use `major-mode' of the current buffer." In XEmacs, the seventh argument of `write-region' specifies the coding-system." - (if (and mustbenew - (or (featurep 'xemacs) - (= emacs-major-version 20))) + (if (and mustbenew (featurep 'xemacs)) (if (file-exists-p filename) - (signal 'file-already-exists - (list "File exists" filename)) + (signal 'file-already-exists (list "File exists" filename)) (write-region start end filename append visit lockname)) (write-region start end filename append visit lockname mustbenew)))