[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/gnus/rfc1843.el [emacs-unicode-2]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/gnus/rfc1843.el [emacs-unicode-2] |
Date: |
Thu, 09 Sep 2004 08:18:55 -0400 |
Index: emacs/lisp/gnus/rfc1843.el
diff -c emacs/lisp/gnus/rfc1843.el:1.4.6.1 emacs/lisp/gnus/rfc1843.el:1.4.6.2
*** emacs/lisp/gnus/rfc1843.el:1.4.6.1 Fri Mar 12 00:03:12 2004
--- emacs/lisp/gnus/rfc1843.el Thu Sep 9 09:36:26 2004
***************
*** 1,5 ****
;;; rfc1843.el --- HZ (rfc1843) decoding
! ;; Copyright (c) 1998, 1999, 2000 Free Software Foundation, Inc.
;; Author: Shenghuo Zhu <address@hidden>
;; Keywords: news HZ HZ+ mail i18n
--- 1,5 ----
;;; rfc1843.el --- HZ (rfc1843) decoding
! ;; Copyright (c) 1998, 1999, 2000, 2003 Free Software Foundation, Inc.
;; Author: Shenghuo Zhu <address@hidden>
;; Keywords: news HZ HZ+ mail i18n
***************
*** 43,60 ****
(defvar rfc1843-hzp-word-regexp
"~\\({\\([\041-\167][\041-\176]\\| \\)+\\|\
! [<>]\\([\041-\175][\041-\176]\\| \\)+\\)\\(~}\\|$\\)")
(defvar rfc1843-hzp-word-regexp-strictly
"~\\({\\([\041-\167][\041-\176]\\)+\\|\
! [<>]\\([\041-\175][\041-\176]\\)+\\)\\(~}\\|$\\)")
(defcustom rfc1843-decode-loosely nil
"Loosely check HZ encoding if non-nil.
When it is set non-nil, only buffers or strings with strictly
HZ-encoded are decoded."
:type 'boolean
! :group 'gnus)
(defcustom rfc1843-decode-hzp t
"HZ+ decoding support if non-nil.
--- 43,60 ----
(defvar rfc1843-hzp-word-regexp
"~\\({\\([\041-\167][\041-\176]\\| \\)+\\|\
! \[<>]\\([\041-\175][\041-\176]\\| \\)+\\)\\(~}\\|$\\)")
(defvar rfc1843-hzp-word-regexp-strictly
"~\\({\\([\041-\167][\041-\176]\\)+\\|\
! \[<>]\\([\041-\175][\041-\176]\\)+\\)\\(~}\\|$\\)")
(defcustom rfc1843-decode-loosely nil
"Loosely check HZ encoding if non-nil.
When it is set non-nil, only buffers or strings with strictly
HZ-encoded are decoded."
:type 'boolean
! :group 'mime)
(defcustom rfc1843-decode-hzp t
"HZ+ decoding support if non-nil.
***************
*** 64,75 ****
The document of HZ+ 0.78 specification can be found at
ftp://ftp.math.psu.edu/pub/simpson/chinese/hzp/hzp.doc"
:type 'boolean
! :group 'gnus)
(defcustom rfc1843-newsgroups-regexp "chinese\\|hz"
"Regexp of newsgroups in which might be HZ encoded."
:type 'string
! :group 'gnus)
(defun rfc1843-decode-region (from to)
"Decode HZ in the region between FROM and TO."
--- 64,75 ----
The document of HZ+ 0.78 specification can be found at
ftp://ftp.math.psu.edu/pub/simpson/chinese/hzp/hzp.doc"
:type 'boolean
! :group 'mime)
(defcustom rfc1843-newsgroups-regexp "chinese\\|hz"
"Regexp of newsgroups in which might be HZ encoded."
:type 'string
! :group 'mime)
(defun rfc1843-decode-region (from to)
"Decode HZ in the region between FROM and TO."
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/gnus/rfc1843.el [emacs-unicode-2],
Miles Bader <=