/[emacs]/emacs/lisp/window.el
ViewVC logotype

Diff of /emacs/lisp/window.el

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

revision 1.103 by lektu, Thu Jun 9 14:03:29 2005 UTC revision 1.104 by lektu, Fri Jun 10 00:57:02 2005 UTC
# Line 92  If ALL-FRAMES is anything else, count on Line 92  If ALL-FRAMES is anything else, count on
92    
93  (defun window-current-scroll-bars (&optional window)  (defun window-current-scroll-bars (&optional window)
94    "Return the current scroll-bar settings in window WINDOW.    "Return the current scroll-bar settings in window WINDOW.
95  Value is a cons (VERTICAL . HORISONTAL) where VERTICAL specifies the  Value is a cons (VERTICAL . HORIZONTAL) where VERTICAL specifies the
96  current location of the vertical scroll-bars (left, right, or nil),  current location of the vertical scroll-bars (left, right, or nil),
97  and HORISONTAL specifies the current location of the horisontal scroll  and HORIZONTAL specifies the current location of the horizontal scroll
98  bars (top, bottom, or nil)."  bars (top, bottom, or nil)."
99    (let ((vert (nth 2 (window-scroll-bars window)))    (let ((vert (nth 2 (window-scroll-bars window)))
100          (hor nil))          (hor nil))

Legend:
Removed from v.1.103  
changed lines
  Added in v.1.104

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