From 52db84b2ab1c19f84f60f6b4006193ce2b4c0488 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Thu, 21 May 1998 10:33:41 +0000 Subject: [PATCH] Sync up with SEMI 1.4.5. --- ChangeLog | 15 +++++++++++++++ README.en | 7 +++++++ mime-play.el | 2 +- semi-def.el | 17 ----------------- 4 files changed, 23 insertions(+), 18 deletions(-) diff --git a/ChangeLog b/ChangeLog index ca0115f..e3928eb 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,7 +1,22 @@ +1998-05-21 MORIOKA Tomohiko + + * README.en (Mailing lists): Add notice about direct-mail for + authors. + 1998-05-20 Katsumi Yamaoka * VERSION: Add new codenames for WEMI. +1998-05-19 MORIOKA Tomohiko + + * mime-play.el (mime-raw-dired-function): Don't refer + 'mime/use-multi-frame. + + * semi-def.el: Abolish variable 'mime/use-multi-frame. + + * Abolish function 'get-version-string because it is + not used. + 1998-05-19 MORIOKA Tomohiko diff --git a/README.en b/README.en index e4c8993..5ee3aa7 100644 --- a/README.en +++ b/README.en @@ -156,6 +156,13 @@ Mailing lists tm-en-help@chamonix.jaist.ac.jp (English) tm-ja-help@chamonix.jaist.ac.jp (Japanese) + Notice that you should not send mail to author(s), such as + morioka@jaist.ac.jp, directly. Because your problem may occur in + other environments (if not, it might be your problem, not bug of + SEMI). We should discuss in the tm mailing lists. Anyway + direct-mail for authors might be ignored. Please send mail to the + tm mailing lists. + CVS based development ===================== diff --git a/mime-play.el b/mime-play.el index 7e50479..943519c 100644 --- a/mime-play.el +++ b/mime-play.el @@ -582,7 +582,7 @@ to write." ;;; (defvar mime-raw-dired-function - (if mime/use-multi-frame + (if (and (>= emacs-major-version 19) window-system) (function dired-other-frame) (function mime-raw-dired-function-for-one-frame) )) diff --git a/semi-def.el b/semi-def.el index 728bab0..b1b63bd 100644 --- a/semi-def.el +++ b/semi-def.el @@ -36,13 +36,6 @@ "Caesar rotation of current region." t) -;;; @ variables -;;; - -(defvar mime/use-multi-frame - (and (>= emacs-major-version 19) window-system)) - - ;;; @ constants ;;; @@ -262,16 +255,6 @@ FUNCTION.") )) -;;; @ RCS version -;;; - -(defsubst get-version-string (id) - "Return a version-string from RCS ID." - (and (string-match ",v \\([0-9][0-9.][0-9.]+\\)" id) - (substring id (match-beginning 1)(match-end 1)) - )) - - ;;; @ Other Utility ;;; -- 1.7.10.4