/[emacs]/emacs/lisp/gnus/gnus-topic.el
ViewVC logotype

Diff of /emacs/lisp/gnus/gnus-topic.el

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

revision 1.8 by zsh, Sun Dec 24 06:36:33 2000 UTC revision 1.9 by zsh, Sat Jul 6 13:15:21 2002 UTC
# Line 1416  If UNINDENT, remove an indentation." Line 1416  If UNINDENT, remove an indentation."
1416          (gnus-topic-kill-group)          (gnus-topic-kill-group)
1417          (push (cdar gnus-topic-killed-topics) gnus-topic-alist)          (push (cdar gnus-topic-killed-topics) gnus-topic-alist)
1418          (gnus-topic-create-topic          (gnus-topic-create-topic
1419           topic parent nil (cdaar gnus-topic-killed-topics))           topic parent nil (cdar (car gnus-topic-killed-topics)))
1420          (pop gnus-topic-killed-topics)          (pop gnus-topic-killed-topics)
1421          (or (gnus-topic-goto-topic topic)          (or (gnus-topic-goto-topic topic)
1422              (gnus-topic-goto-topic parent))))))              (gnus-topic-goto-topic parent))))))
# Line 1435  If UNINDENT, remove an indentation." Line 1435  If UNINDENT, remove an indentation."
1435        (push (cdar gnus-topic-killed-topics) gnus-topic-alist)        (push (cdar gnus-topic-killed-topics) gnus-topic-alist)
1436        (gnus-topic-create-topic        (gnus-topic-create-topic
1437         topic grandparent (gnus-topic-next-topic parent)         topic grandparent (gnus-topic-next-topic parent)
1438         (cdaar gnus-topic-killed-topics))         (cdar (car gnus-topic-killed-topics)))
1439        (pop gnus-topic-killed-topics)        (pop gnus-topic-killed-topics)
1440        (gnus-topic-goto-topic topic))))        (gnus-topic-goto-topic topic))))
1441    

Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9

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