diff options
author | cvs2svn <cvs2svn@FreeBSD.org> | 2000-09-23 01:36:53 +0000 |
---|---|---|
committer | cvs2svn <cvs2svn@FreeBSD.org> | 2000-09-23 01:36:53 +0000 |
commit | 8c7499bdfa85657ea6c2517ada0ef4a4db489beb (patch) | |
tree | 1c37a6088704b234484b1352cd1f882fb2a253ad /editors/psgml/files/patch-ag | |
parent | Catch up with Wnn6-lib update. (diff) |
This commit was manufactured by cvs2svn to create tag 'RELEASE_4_1_1'.release/4.1.1
Diffstat (limited to 'editors/psgml/files/patch-ag')
-rw-r--r-- | editors/psgml/files/patch-ag | 39 |
1 files changed, 0 insertions, 39 deletions
diff --git a/editors/psgml/files/patch-ag b/editors/psgml/files/patch-ag deleted file mode 100644 index 90792b64da9a..000000000000 --- a/editors/psgml/files/patch-ag +++ /dev/null @@ -1,39 +0,0 @@ ---- psgml-parse.el.orig Mon Nov 16 06:45:04 1998 -+++ psgml-parse.el Sat Jan 23 20:28:15 1999 -@@ -1217,6 +1217,11 @@ - (sgml-check-dtd-subset) - (sgml-pop-entity) - (erase-buffer) -+ ;; For Mule -+ (if (string-match "Emacs 20\." (emacs-version)) -+ (set-buffer-file-coding-system 'binary) -+ (if (boundp 'MULE) -+ (set-file-coding-system *noconv*))) - (sgml-write-dtd sgml-dtd-info to-file) - t)) - -@@ -1244,6 +1249,10 @@ - "Merge the binary coded dtd in the current buffer with the current dtd. - The current dtd is the variable sgml-dtd-info. Return t if mereged - was successfull or nil if failed." -+ (if (string-match "Emacs 20\." (emacs-version)) -+ (set-buffer-file-coding-system 'binary) -+ (if (boundp 'MULE) -+ (set-file-coding-system *noconv*))) - (goto-char (point-min)) - (sgml-read-sexp) ; skip filev - (let ((dependencies (sgml-read-sexp)) -@@ -2461,7 +2470,12 @@ - (set-buffer sgml-scratch-buffer) - ;; For MULE to not misinterpret binary data set the mc-flag - ;; (reported by Jeffrey Friedl <jfriedl@nff.ncl.omron.co.jp>) -- (set 'mc-flag nil) -+ (set 'mc-flag nil) -+ ;; For MULE/Emacs 20 to not misinterpret binary data -+ (if (string-match "Emacs 20\." (emacs-version)) -+ (set-buffer-file-coding-system 'binary) -+ (if (boundp 'MULE) -+ (set-file-coding-system *noconv*))) - (when (eq sgml-scratch-buffer (default-value 'sgml-scratch-buffer)) - (make-local-variable 'sgml-scratch-buffer) - (setq sgml-scratch-buffer nil)) |