[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-cite.el

[Juanma Barranquero]

Index: emacs/lisp/gnus/gnus-cite.el
diff -c emacs/lisp/gnus/gnus-cite.el:1.9 emacs/lisp/gnus/gnus-cite.el:1.10
*** emacs/lisp/gnus/gnus-cite.el:1.9    Wed May  8 21:50:47 2002
--- emacs/lisp/gnus/gnus-cite.el        Tue Feb  4 08:06:38 2003
***************
*** 480,487 ****
                          gnus-hidden-properties))
            (point (point-min))
            found beg end start)
!       (while (setq point 
!                    (text-property-any point (point-max) 
                                        'gnus-callback
                                        'gnus-article-toggle-cited-text))
          (setq found t)
--- 480,487 ----
                          gnus-hidden-properties))
            (point (point-min))
            found beg end start)
!       (while (setq point
!                    (text-property-any point (point-max)
                                        'gnus-callback
                                        'gnus-article-toggle-cited-text))
          (setq found t)
***************
*** 559,569 ****
              (and (< arg 0) hidden))
        (if hidden
          (gnus-remove-text-properties-when
!          'article-type 'cite beg end 
           (cons 'article-type (cons 'cite
                                     gnus-hidden-properties)))
        (gnus-add-text-properties-when
!        'article-type nil beg end 
         (cons 'article-type (cons 'cite
                                   gnus-hidden-properties))))
        (save-excursion
--- 559,569 ----
              (and (< arg 0) hidden))
        (if hidden
          (gnus-remove-text-properties-when
!          'article-type 'cite beg end
           (cons 'article-type (cons 'cite
                                     gnus-hidden-properties)))
        (gnus-add-text-properties-when
!        'article-type nil beg end
         (cons 'article-type (cons 'cite
                                   gnus-hidden-properties))))
        (save-excursion