[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-util.el
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/gnus/gnus-util.el |
Date: |
Mon, 25 Jul 2005 17:35:57 -0400 |
Index: emacs/lisp/gnus/gnus-util.el
diff -c emacs/lisp/gnus/gnus-util.el:1.30 emacs/lisp/gnus/gnus-util.el:1.31
*** emacs/lisp/gnus/gnus-util.el:1.30 Fri Jul 22 08:22:40 2005
--- emacs/lisp/gnus/gnus-util.el Mon Jul 25 21:35:55 2005
***************
*** 1577,1606 ****
(defalias 'gnus-set-process-query-on-exit-flag
'process-kill-without-query))
- (defun gnus-beginning-of-window ()
- "Move point to the beginning of the window."
- (move-to-window-line
- (if (featurep 'xemacs)
- 0
- (min scroll-margin
- (max 1 (- (window-height)
- (if mode-line-format 1 0)
- (if (and (boundp 'header-line-format)
- (symbol-value 'header-line-format))
- 1 0)))))))
-
- (defun gnus-end-of-window ()
- "Move point to the end of the window."
- (move-to-window-line
- (if (featurep 'xemacs)
- -1
- (max (- -1 scroll-margin)
- (- -1 (max 1 (- (window-height)
- (if mode-line-format 1 0)
- (if (and (boundp 'header-line-format)
- (symbol-value 'header-line-format))
- 1 0))))))))
-
(provide 'gnus-util)
;;; arch-tag: f94991af-d32b-4c97-8c26-ca12a934de49
--- 1577,1582 ----