Permalink
Browse files

tm 7.80.

  • Loading branch information...
morioka
morioka committed Mar 9, 1998
1 parent 246285c commit d2bd1d615b419b48e6d81c90b0a012c767398a65
Showing with 264 additions and 28 deletions.
  1. +234 −0 ChangeLog
  2. +28 −27 emu-xemacs.el
  3. +2 −1 install.el
View
234 ChangeLog
@@ -1,3 +1,237 @@
+Sat Aug 31 15:08:42 1996 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * tl: Version 7.61 was released.
+
+Fri Aug 30 16:12:22 1996 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * tl-list.el (list*): New function.
+
+ * std11.el (std11-find-field-body): New function.
+
+Fri Aug 30 15:14:30 1996 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * std11.el (std11-unfold-string): New function.
+
+Wed Aug 28 14:40:33 1996 MORIOKA Tomohiko <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
+
+ * 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 <morioka@jaist.ac.jp>
* tl: Version 7.48 was released.
View
@@ -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 <morioka@jaist.ac.jp>
-;;; Version:
-;;; $Id$
-;;; 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 <morioka@jaist.ac.jp>
+;; Version:
+;; $Id$
+;; 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))
))
View
@@ -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)

0 comments on commit d2bd1d6

Please sign in to comment.