Skip to content
Browse files

update.

  • Loading branch information...
1 parent 46c344d commit edd56bcde972261958599c5a296036aeaf0cc901 morioka committed Dec 17, 1998
Showing with 8 additions and 44 deletions.
  1. +0 −27 ChangeLog
  2. +1 −1 Makefile
  3. +1 −1 install.el
  4. +1 −3 mcs-om.el
  5. +5 −5 poem-om.el
  6. +0 −7 poem-xm.el
View
27 ChangeLog
@@ -1,30 +1,3 @@
-1998-12-24 MORIOKA Tomohiko <morioka@jaist.ac.jp>
-
- * install.el (install-detect-elisp-directory): Avoid problem if
- prefix of an emacs has its version.
-
-
-1998-12-22 MORIOKA Tomohiko <morioka@jaist.ac.jp>
-
- * APEL: Version 9.12 was released.
-
-1998-12-20 MORIOKA Tomohiko <morioka@jaist.ac.jp>
-
- * mcs-om.el: Avoid error when cyrillic.el is not found.
-
-1998-12-19 MORIOKA Tomohiko <morioka@jaist.ac.jp>
-
- * poem-xm.el: Define coding-system `gb2312-dos', `gb2312-mac' and
- `gb2312-unix' if it is not found.
-
-1998-12-18 Katsumi Yamaoka <yamaoka@jpl.org>
-
- * poem-om.el (poem-ccl-decode-raw-text): Renamed from
- `ccl-decode-raw-text'.
- (poem-ccl-encode-raw-text): Renamed from `ccl-encode-raw-text'.
- (poem-ccl-encode-raw-text-CRLF): Renamed from
- `ccl-encode-raw-text-CRLF`.
-
1998-12-17 MORIOKA Tomohiko <morioka@jaist.ac.jp>
* poem-om.el (poem-decode-raw-text): New function for MULE 1.
View
2 Makefile
@@ -2,7 +2,7 @@
# Makefile for APEL.
#
-VERSION = 9.12
+VERSION = 9.11
TAR = tar
RM = /bin/rm -f
View
2 install.el
@@ -170,7 +170,7 @@
(while (setq dir (car rest))
(if (string-match pat dir)
(if (or allow-version-specific
- (not (string-match (format "/%d\\.%d"
+ (not (string-match (format "%d\\.%d"
emacs-major-version
emacs-minor-version) dir))
)
View
4 mcs-om.el
@@ -103,9 +103,7 @@
;;; @ to coding-system
;;;
-(condition-case nil
- (require 'cyrillic)
- (error nil))
+(require 'cyrillic)
(defvar mime-charset-coding-system-alist
'((iso-8859-1 . *ctext*)
View
10 poem-om.el
@@ -49,7 +49,7 @@
0))
))))
- (define-ccl-program poem-ccl-decode-raw-text
+ (define-ccl-program ccl-decode-raw-text
'(1
((read r1 r0)
(loop
@@ -67,13 +67,13 @@
(write r1))
"Convert line-break code from CRLF to LF.")
- (define-ccl-program poem-ccl-encode-raw-text
+ (define-ccl-program ccl-encode-raw-text
'(1
((read r0)
(loop (write-read-repeat r0))))
"Pass through without any conversions.")
- (define-ccl-program poem-ccl-encode-raw-text-CRLF
+ (define-ccl-program ccl-encode-raw-text-CRLF
'(2
((loop
(read r0)
@@ -87,13 +87,13 @@
'raw-text 4 ?=
"No conversion"
nil
- (cons poem-ccl-decode-raw-text poem-ccl-encode-raw-text))
+ (cons ccl-decode-raw-text ccl-encode-raw-text))
(make-coding-system
'raw-text-dos 4 ?=
"No conversion"
nil
- (cons poem-ccl-decode-raw-text poem-ccl-encode-raw-text-CRLF))
+ (cons ccl-decode-raw-text ccl-encode-raw-text-CRLF))
)
(t
(defun poem-decode-raw-text (from to)
View
7 poem-xm.el
@@ -64,13 +64,6 @@
mnemonic "ISO7/SS2"
eol-type nil)))
-(or (find-coding-system 'gb2312-dos)
- (copy-coding-system 'cn-gb-2312-dos 'gb2312-dos))
-(or (find-coding-system 'gb2312-mac)
- (copy-coding-system 'cn-gb-2312-mac 'gb2312-mac))
-(or (find-coding-system 'gb2312-unix)
- (copy-coding-system 'cn-gb-2312-unix 'gb2312-unix))
-
(or (find-coding-system 'euc-kr-dos)
(make-coding-system
'euc-kr 'iso2022

0 comments on commit edd56bc

Please sign in to comment.
Something went wrong with that request. Please try again.