From: Glenn Morris Date: Fri, 12 Oct 2007 03:05:02 +0000 (+0000) Subject: Re-fill copyright header. X-Git-Tag: emacs-pretest-23.0.90~10406 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5701a0ce2170e42cb152e63fc250947a4dc481f2;p=emacs.git Re-fill copyright header. (rmail-list-to-menu): Use mapc rather than mapcar. --- diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 0589824d958..c999f687fbc 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -1,7 +1,8 @@ ;;; rmail.el --- main code of "RMAIL" mail reader for Emacs ;; Copyright (C) 1985, 1986, 1987, 1988, 1993, 1994, 1995, 1996, 1997, 1998, -;; 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007 Free Software Foundation, Inc. +;; 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007 +;; Free Software Foundation, Inc. ;; Maintainer: FSF ;; Keywords: mail @@ -1460,7 +1461,7 @@ original copy." (defun rmail-list-to-menu (menu-name l action &optional full-name) (let ((menu (make-sparse-keymap menu-name))) - (mapcar + (mapc (function (lambda (item) (let (command) (if (consp item)