/[emacs]/emacs/lisp/gnus/nnimap.el
ViewVC logotype

Diff of /emacs/lisp/gnus/nnimap.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.10.6.1 by handa, Fri Mar 12 00:03:11 2004 UTC revision 1.10.6.2 by miles, Mon Jun 28 07:29:46 2004 UTC
# Line 1  Line 1 
1  ;;; nnimap.el --- imap backend for Gnus  ;;; nnimap.el --- imap backend for Gnus
2  ;; Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.  
3    ;; Copyright (C) 1998,1999,2000,01,02,2004  Free Software Foundation, Inc.
4    
5  ;; Author: Simon Josefsson <jas@pdc.kth.se>  ;; Author: Simon Josefsson <jas@pdc.kth.se>
6  ;;         Jim Radford <radford@robby.caltech.edu>  ;;         Jim Radford <radford@robby.caltech.edu>
# Line 671  function is generally only called when G Line 672  function is generally only called when G
672      (nnoo-status-message 'nnimap server)))      (nnoo-status-message 'nnimap server)))
673    
674  (defun nnimap-demule (string)  (defun nnimap-demule (string)
675    (funcall (if (and (fboundp 'string-as-multibyte)    ;; BEWARE: we used to use string-as-multibyte here which is braindead
676                      (subrp (symbol-function 'string-as-multibyte)))    ;; because it will turn accidental emacs-mule-valid byte sequences
677                 'string-as-multibyte    ;; into multibyte chars.  --Stef
678      (funcall (if (and (fboundp 'string-to-multibyte)
679                        (subrp (symbol-function 'string-to-multibyte)))
680                   'string-to-multibyte
681               'identity)               'identity)
682             (or string "")))             (or string "")))
683    
# Line 1383  sure of changing the value of `foo'." Line 1387  sure of changing the value of `foo'."
1387    
1388  (provide 'nnimap)  (provide 'nnimap)
1389    
1390  ;;; arch-tag: 2b001f20-3ff9-4094-a0ad-46807c1ba70b  ;; arch-tag: 2b001f20-3ff9-4094-a0ad-46807c1ba70b
1391  ;;; nnimap.el ends here  ;;; nnimap.el ends here

Legend:
Removed from v.1.10.6.1  
changed lines
  Added in v.1.10.6.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26