X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=mime-view.el;h=4b34e15bfd5d17fd12085bee1947325c52d20198;hb=dc2d3a28ac1c26cc2eaa5a6057c99b276e1bc202;hp=057f8dc3c4d69b4d62b3331402107482aadc5425;hpb=359afa10ca36fb648d7410f8e05f84774d1888f0;p=elisp%2Fsemi.git diff --git a/mime-view.el b/mime-view.el index 057f8dc..4b34e15 100644 --- a/mime-view.el +++ b/mime-view.el @@ -1,15 +1,14 @@ ;;; mime-view.el --- interactive MIME viewer for GNU Emacs -;; Copyright (C) 1995,1996,1997 Free Software Foundation, Inc. +;; Copyright (C) 1995,1996,1997,1998 Free Software Foundation, Inc. ;; Author: MORIOKA Tomohiko ;; Created: 1994/7/13 ;; Renamed: 1994/8/31 from tm-body.el ;; Renamed: 1997/02/19 from tm-view.el -;; Version: $Revision: 0.119 $ ;; Keywords: MIME, multimedia, mail, news -;; This file is part of SEMI (SEMI is Emacs MIME Interfaces). +;; This file is part of SEMI (Sophisticated Emacs MIME Interfaces). ;; This program is free software; you can redistribute it and/or ;; modify it under the terms of the GNU General Public License as @@ -38,15 +37,10 @@ ;;; @ version ;;; -(defconst mime-view-RCS-ID - "$Id: mime-view.el,v 0.119 1998-02-25 13:44:07 morioka Exp $") - -(defconst mime-view-version - `,(get-version-string mime-view-RCS-ID)) - (defconst mime-view-version-string - `,(concat "SEMI MIME-View " mime-view-version - " (" semi-version-name ")")) + `,(concat "SEMI MIME-View " + (mapconcat #'number-to-string (cdr semi-version) ".") + " (" (car semi-version) ")")) ;;; @ variables