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

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

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

revision 1.2 by miles, Sat Sep 4 13:13:43 2004 UTC revision 1.3 by miles, Tue Dec 7 21:56:39 2004 UTC
# Line 82  ARTICLE is the article number of the cur Line 82  ARTICLE is the article number of the cur
82    
83  ;;; Interface functions  ;;; Interface functions
84    
85    (eval-when-compile
86      (defmacro nnrss-string-as-multibyte (string)
87        (if (featurep 'xemacs)
88            string
89          `(string-as-multibyte ,string))))
90    
91  (deffoo nnrss-retrieve-headers (articles &optional group server fetch-old)  (deffoo nnrss-retrieve-headers (articles &optional group server fetch-old)
92    (nnrss-possibly-change-group group server)    (nnrss-possibly-change-group group server)
93    (let (e)    (let (e)
# Line 410  ARTICLE is the article number of the cur Line 416  ARTICLE is the article number of the cur
416    
417  (defalias 'nnrss-insert 'nnrss-insert-w3)  (defalias 'nnrss-insert 'nnrss-insert-w3)
418    
 (if (featurep 'xemacs)  
     (defalias 'nnrss-string-as-multibyte 'identity)  
   (defalias 'nnrss-string-as-multibyte 'string-as-multibyte))  
   
419  ;;; Snarf functions  ;;; Snarf functions
420    
421  (defun nnrss-check-group (group server)  (defun nnrss-check-group (group server)

Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3

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