[sawfish] Minor bugfix. Correct integer type is used, instead of "round".
- From: Christopher Bratusek <chrisb src gnome org>
- To: svn-commits-list gnome org
- Cc:
- Subject: [sawfish] Minor bugfix. Correct integer type is used, instead of "round".
- Date: Sat, 5 Dec 2009 10:33:57 +0000 (UTC)
commit ae60bf949a4cd3790394c04a1ee48c9c54cc0d7b
Author: Teika kazura <teika lavabit com>
Date: Fri Dec 4 15:07:42 2009 +0900
Minor bugfix. Correct integer type is used, instead of "round".
lisp/sawfish/wm/commands/move-resize.jl | 8 ++++----
1 files changed, 4 insertions(+), 4 deletions(-)
---
diff --git a/lisp/sawfish/wm/commands/move-resize.jl b/lisp/sawfish/wm/commands/move-resize.jl
index b6f555f..5d8b51c 100644
--- a/lisp/sawfish/wm/commands/move-resize.jl
+++ b/lisp/sawfish/wm/commands/move-resize.jl
@@ -569,10 +569,10 @@ that window."
(define (move-window-center w)
(move-window-to w
- (round (/ (- (screen-width)
- (car (window-frame-dimensions w))) 2))
- (round (/ (- (screen-height)
- (cdr (window-frame-dimensions w))) 2))))
+ (quotient (- (screen-width)
+ (car (window-frame-dimensions w))) 2)
+ (quotient (- (screen-height)
+ (cdr (window-frame-dimensions w))) 2)))
;;###autoload
(define-command 'move-window-center
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]