diff options
Diffstat (limited to 'wm/sawfish/patches/patch-ad')
-rw-r--r-- | wm/sawfish/patches/patch-ad | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/wm/sawfish/patches/patch-ad b/wm/sawfish/patches/patch-ad new file mode 100644 index 00000000000..62bc5411ce5 --- /dev/null +++ b/wm/sawfish/patches/patch-ad @@ -0,0 +1,13 @@ +$NetBSD: patch-ad,v 1.1 2003/01/18 06:37:02 toshii Exp $ + +--- lisp/sawfish/wm/windows.jl.orig Mon Nov 4 12:35:38 2002 ++++ lisp/sawfish/wm/windows.jl +@@ -320,7 +320,7 @@ If HINTS is non-nil, then it is the size + (t x)))) + + (define (adjust-position-for-gravity/y w grav y #!key inverse) +- (let* ((tl-off (window-frame-offset w)) ++ (let* ((tl-off (cdr (window-frame-offset w))) + (br-off (- (cdr (window-frame-dimensions w)) + (cdr (window-dimensions w)))) + (sign (if inverse -1 +1))) |