emacs-diffs
[Top][All Lists]
Advanced

[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 ----




reply via email to

[Prev in Thread] Current Thread [Next in Thread]