(require 'vm)
(defconst tm-vm/RCS-ID
- "$Id: tm-vm.el,v 7.0 1995/10/03 05:04:35 morioka Exp $")
+ "$Id: tm-vm.el,v 7.1 1995/10/17 16:49:51 morioka Exp $")
(defconst tm-vm/version (get-version-string tm-vm/RCS-ID))
(define-key vm-mode-map "Z" 'tm-vm/view-message)
;; (setq vm-summary-format "%n %*%a %-17.17F %-3.3m %2d %4l/%-5c, %I\"%UA\"\n")
;; (defun vm-summary-function-A (m)
-;; (mime/decode-encoded-words-string (vm-su-subject m)))
+;; (mime-ewords/decode-string (vm-su-subject m)))
;;; @ functions