From: morioka Date: Mon, 9 Mar 1998 20:08:19 +0000 (+0000) Subject: tm 7.80. X-Git-Tag: tm7_80~1 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=68b802f4f6cc82a8b46e62c283f96a51774aa5de;p=elisp%2Fapel.git tm 7.80. --- diff --git a/ChangeLog b/ChangeLog index 3fc1789..20ec0de 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,237 @@ +Sat Aug 31 15:08:42 1996 MORIOKA Tomohiko + + * tl: Version 7.61 was released. + +Fri Aug 30 16:12:22 1996 MORIOKA Tomohiko + + * tl-list.el (list*): New function. + + * std11.el (std11-find-field-body): New function. + +Fri Aug 30 15:14:30 1996 MORIOKA Tomohiko + + * emu-xemacs.el (next-visible-point): fixed. (cf. [tm-en:719]) + + * install.el (install-file): check write + permission. (cf. [bug-tm-en:720]) + +Fri Aug 30 06:11:58 1996 MORIOKA Tomohiko + + * std11.el (std11-addr-to-string): Add DOC-string. + (std11-address-string): Add DOC-string. + (std11-full-name-string): Add DOC-string. + +Fri Aug 30 04:25:34 1996 MORIOKA Tomohiko + + * mu-cite.el (mu-cite/get-field-value): Function + `std11-find-field-body' was renamed to `std11-field-body'. + + * mu-cite.el (mu-cite/get-field-value-method-alist): Function + `std11-find-field-body' was renamed to `std11-field-body'. + + * tl-822.el (rfc822/get-field-body): Function + `std11-find-field-body' was renames to `std11-field-body'. + (rfc822/get-field-bodies): Function `std11-find-field-bodies' was + renames to `std11-field-bodies'. + + * std11.el (std11-field-body): Renamed from + `std11-find-field-body'. + (std11-field-bodies): Renamed from `std11-find-field-bodies'. + +Wed Aug 28 22:52:29 1996 MORIOKA Tomohiko + + * std11.el (std11-parse-addresses-string): New function. + + * mu-cite.el: Use std11.el instead of tl-822.el. + +Wed Aug 28 21:06:59 1996 MORIOKA Tomohiko + + * std11.el (std11-full-name-string): New function. + + * tl-822.el (rfc822/full-name-string): New alias for + `std11-full-name-string'; moved to std11.el. + + * std11.el (std11-addr-to-string): eliminate comments. + + * std11.el (std11-addr-to-string): New function; moved from + tl-822.el. + (std11-address-string): New function; moved from tl-822.el. + + * tl-822.el (rfc822/address-string): New aliases for + `std11-address-string'; moved to std11.el. + + * std11.el (std11-parse-address-string): moved from + std11-parse.el. + + * std11-parse.el: Function `std11-parse-address-string' was moved + to std11.el. + +Wed Aug 28 20:45:00 1996 MORIOKA Tomohiko + + * TL-ELS: Add std11.el and std11-parse.el. + + * tl-822.el (rfc822/extract-address-components): Use function + `std11-parse-address-string'. + + * std11.el (std11-parse-address-string): Add as autoload function. + + * std11-parse.el (std11-parse-address-string): New function. + +Wed Aug 28 20:34:53 1996 MORIOKA Tomohiko + + * std11-parse.el: Parser were moved from tl-822.el and renamed to + `std11-*'. + + * std11.el (std11-parse-address, std11-parse-addresses): Add as + autoload function. + + * tl-822.el: Parser were moved to std11-parse.el and renamed to + `std11-*'. + (rfc822/parse-address): New aliases for `std11-parse-address'. + (rfc822/parse-addresses): New aliases for `std11-parse-addresses'. + +Wed Aug 28 18:18:03 1996 MORIOKA Tomohiko + + * std11.el: Remove autoload for `std11-analyze-*'. + Add `std11-lexical-analyze' as autoload function of std11-parse. + +Wed Aug 28 18:15:17 1996 MORIOKA Tomohiko + + * tl-822.el: Alias `rfc822/analyze-spaces', + `rfc822/analyze-special', `rfc822/analyze-atom', + `rfc822/analyze-quoted-string', `rfc822/analyze-domain-literal', + and `rfc822/analyze-comment' were abolished. + +Wed Aug 28 18:12:56 1996 MORIOKA Tomohiko + + * tl-822.el (rfc822/lexical-analyze): New alias for + `std11-lexical-analyze'; moved to std11-parse.el. + + * std11-parse.el (std11-lexical-analyze): New function. + + * tl-822.el (rfc822/analyze-comment): New alias; new + implementation. + + * std11-parse.el (std11-check-enclosure): New function; changed + from `std11-analyze-enclosure'. + (std11-analyze-quoted-string): Use function + `std11-check-enclosure'. + (std11-analyze-domain-literal): Use function + `std11-check-enclosure'. + (std11-analyze-comment): New function. + + * tl-822.el (rfc822/analyze-domain-literal): New alias. + + * std11-parse.el (std11-analyze-domain-literal): New function. + + * std11-parse.el (std11-analyze-enclosure): New function. + (std11-analyze-quoted-string): New implementation. + + * std11-parse.el (std11-analyze-quoted-string): New function. + + * tl-822.el (rfc822/analyze-quoted-string): New alias for + `std11-analyze-quoted-string'; moved to std11-parse.el. + +Wed Aug 28 17:16:30 1996 MORIOKA Tomohiko + + * tl-822.el (rfc822/analyze-atom): New alias for + `std11-analyze-atom'; New implementation. + + * std11-parse.el (std11-analyze-atom): New function. + + * std11.el: Add `std11-analyze-special' as autoload function of + std11-parse. + + * std11-parse.el (std11-analyze-special): New function. + + * tl-822.el (rfc822/analyze-special): + New alias for `std11-analyze-special'; moved + to std11-parse.el. + + * std11.el: autoload std11-parse for `std11-analyze-spaces'. + + * std11-parse.el: New module. + + * tl-822.el (rfc822/analyze-spaces): New alias for + `std11-analyze-spaces'; moved to std11-parse.el. + +Wed Aug 28 15:39:00 1996 MORIOKA Tomohiko + + * tl-822.el, std11.el: Function `std11-field-names' was renamed to + `std11-collect-field-names'. + +Wed Aug 28 15:26:10 1996 MORIOKA Tomohiko + + * tl-822.el, std11.el: Function `std11-field-bodies' was renamed + to `std11-find-field-bodies'. + +Wed Aug 28 15:18:03 1996 MORIOKA Tomohiko + + * mu-cite.el + (mu-cite/get-field-value-method-alist, mu-cite/get-field-value): + Function `std11-field-body' was renamed to + `std11-find-field-body'. + + * tl-822.el, std11.el: Function `std11-field-body' was renamed to + `std11-find-field-body'. + +Wed Aug 28 15:11:19 1996 MORIOKA Tomohiko + + * std11.el (std11-unfold-string): New function. + +Wed Aug 28 14:40:33 1996 MORIOKA Tomohiko + + * tl-822.el (rfc822/unfolding-string): New alias for + `std11-unfold-string'; moved to std11.el. + +Wed Aug 28 14:17:21 1996 MORIOKA Tomohiko + + * std11.el (std11-field-body): fixed. + + * mu-cite.el: Use function `std11-field-body' instead of + `rfc822/get-field-body'. + + * x-face-mule.el: Use std11.el. + + * std11.el (std11-field-bodies): New function. + + * tl-822.el (rfc822/get-field-bodies): New alias for + `std11-field-bodies'; moved to std11.el. + + * tl-822.el: Constant `rfc822/field-name-regexp' was abolished. + + * tl-822.el: Constant `rfc822/field-top-regexp' was abolished. + + * std11.el (std11-field-names): New function. + + * tl-822.el (rfc822/get-field-names): New alias for + `std11-field-names'; moved to std11.el. + + * tl-822.el: Constant `rfc822::next-field-top-regexp' was + abolished. + + * std11.el (std11-field-body): New function. + + * tl-822.el (rfc822/get-field-body): New alias for + `std11-field-body'; moved to std11.el. + + * std11.el (std11-next-field-head-regexp): New constant. + + * std11.el: New module. + + * tl-822.el (rfc822/narrow-to-header): New alias for + `std11-narrow-to-header'; moved to std11.el. + (rfc822/get-header-string): New alias for `std11-header-string'; + moved to std11.el. + (rfc822/get-header-string-except): New alias for + `std11-header-string-except'; moved to std11.el. + (rfc822/field-end): New alias for `std11-field-end'; moved to + std11.el. + + * tl-seq.el: autoload for cl.el does not work to load cl-seq. (cf. + [tm-en:709,710]) + + Fri Aug 23 07:28:37 1996 MORIOKA Tomohiko * tl: Version 7.48 was released. diff --git a/emu-xemacs.el b/emu-xemacs.el index 0fe3b06..2b3c306 100644 --- a/emu-xemacs.el +++ b/emu-xemacs.el @@ -1,30 +1,30 @@ -;;; ;;; emu-xemacs.el --- Emacs 19 emulation module for XEmacs -;;; -;;; Copyright (C) 1995 Free Software Foundation, Inc. -;;; Copyright (C) 1995 MORIOKA Tomohiko -;;; -;;; Author: MORIOKA Tomohiko -;;; Version: -;;; $Id: emu-xemacs.el,v 7.9 1996/07/22 18:54:54 morioka Exp $ -;;; Keywords: emulation, compatibility, XEmacs -;;; -;;; This file is part of tl (Tiny Library). -;;; -;;; This program is free software; you can redistribute it and/or -;;; modify it under the terms of the GNU General Public License as -;;; published by the Free Software Foundation; either version 2, or -;;; (at your option) any later version. -;;; -;;; This program is distributed in the hope that it will be useful, -;;; but WITHOUT ANY WARRANTY; without even the implied warranty of -;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -;;; General Public License for more details. -;;; -;;; You should have received a copy of the GNU General Public License -;;; along with This program. If not, write to the Free Software -;;; Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. -;;; + +;; Copyright (C) 1995 Free Software Foundation, Inc. +;; Copyright (C) 1995,1996 MORIOKA Tomohiko + +;; Author: MORIOKA Tomohiko +;; Version: +;; $Id: emu-xemacs.el,v 7.10 1996/08/30 15:14:30 morioka Exp $ +;; Keywords: emulation, compatibility, XEmacs + +;; This file is part of tl (Tiny Library). + +;; This program is free software; you can redistribute it and/or +;; modify it under the terms of the GNU General Public License as +;; published by the Free Software Foundation; either version 2, or (at +;; your option) any later version. + +;; This program is distributed in the hope that it will be useful, but +;; WITHOUT ANY WARRANTY; without even the implied warranty of +;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +;; General Public License for more details. + +;; You should have received a copy of the GNU General Public License +;; along with this program; see the file COPYING. If not, write to +;; the Free Software Foundation, Inc., 59 Temple Place - Suite 330, +;; Boston, MA 02111-1307, USA. + ;;; Code: ;;; @ text property @@ -108,7 +108,8 @@ ) (setq pos (1+ pos)) ) - (next-single-property-change pos 'invisible) + (or (next-single-property-change pos 'invisible) + (point-max)) )) diff --git a/install.el b/install.el index f934a69..e557267 100644 --- a/install.el +++ b/install.el @@ -4,7 +4,7 @@ ;; Author: MORIOKA Tomohiko ;; Created: 1996/8/18 -;; Version: $Id: install.el,v 1.5 1996/08/21 12:08:41 morioka Exp $ +;; Version: $Id: install.el,v 1.6 1996/08/30 15:12:25 morioka Exp $ ;; Keywords: install ;; This file is part of tl (Tiny Library). @@ -57,7 +57,8 @@ (copy-file src-file full-path t t) (if move (catch 'tag - (while (file-exists-p src-file) + (while (and (file-exists-p src-file) + (file-writable-p src-file)) (condition-case err (progn (delete-file src-file)