- fixed little copy-paste error in configure-window

2004-02-09 14:09:35 +00:00 · 2004-02-09 14:09:35 +00:00 · aaf2089247
parent 312db73689
commit aaf2089247
1 changed files with 2 additions and 2 deletions
--- a/src/move-wm.scm
+++ b/src/move-wm.scm
@ -80,8 +80,8 @@
 		      (lambda (c.x) (- (cdr c.x) (rectangle:x r))))
 		     (else 0)))
 		(dy (cond
-		     ((assq (window-change x) changes) =>
-		      (lambda (c.x) (- (cdr c.x) (rectangle:x r))))
+		     ((assq (window-change y) changes) =>
+		      (lambda (c.y) (- (cdr c.y) (rectangle:y r))))
 		     (else 0)))
 		(dw (cond
 		     ((assq (window-change width) changes) =>