[Emacs-diffs] Changes to emacs/lisp/mh-e/mh-identity.el

[Bill Wohler]

Index: emacs/lisp/mh-e/mh-identity.el
diff -c emacs/lisp/mh-e/mh-identity.el:1.5 emacs/lisp/mh-e/mh-identity.el:1.6
*** emacs/lisp/mh-e/mh-identity.el:1.5  Mon Sep  1 15:45:33 2003
--- emacs/lisp/mh-e/mh-identity.el      Tue Jul 13 03:06:24 2004
***************
*** 1,6 ****
  ;;; mh-identity.el --- Multiple identify support for MH-E.
  
! ;; Copyright (C) 2002, 2003 Free Software Foundation, Inc.
  
  ;; Author: Peter S. Galbraith <address@hidden>
  ;; Maintainer: Bill Wohler <address@hidden>
--- 1,6 ----
  ;;; mh-identity.el --- Multiple identify support for MH-E.
  
! ;; Copyright (C) 2002, 2003, 2004 Free Software Foundation, Inc.
  
  ;; Author: Peter S. Galbraith <address@hidden>
  ;; Maintainer: Bill Wohler <address@hidden>
***************
*** 40,46 ****
  ;;; Code:
  
  
! (require 'cl)
  
  (eval-when (compile load eval)
    (defvar mh-comp-loaded nil)
--- 40,47 ----
  ;;; Code:
  
  
! (require 'mh-utils)
! (mh-require-cl)
  
  (eval-when (compile load eval)
    (defvar mh-comp-loaded nil)
***************
*** 63,68 ****
--- 64,71 ----
         ;;  ["home" (mh-insert-identity "home")
         ;;   :style radio :active (not (equal mh-identity-local "home"))
         ;;   :selected (equal mh-identity-local "home")]
+        '(["Insert Auto Fields" (mh-insert-auto-fields) mh-auto-fields-list]
+          "--")
         (mapcar (function
                  (lambda (arg)
                    `[,arg  (mh-insert-identity ,arg) :style radio