[sawfish] fixed two issues in draft animator
- From: Christopher Bratusek <chrisb src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [sawfish] fixed two issues in draft animator
- Date: Wed, 18 Aug 2010 15:22:07 +0000 (UTC)
commit 935152f5b276c735e81af95f0fbfc67bcb249464
Author: Christopher Roy Bratusek <zanghar freenet de>
Date: Wed Aug 18 17:20:44 2010 +0200
fixed two issues in draft animator
lisp/sawfish/wm/util/window-outline.jl | 4 ++--
1 files changed, 2 insertions(+), 2 deletions(-)
---
diff --git a/lisp/sawfish/wm/util/window-outline.jl b/lisp/sawfish/wm/util/window-outline.jl
index 8962bac..67b87a7 100644
--- a/lisp/sawfish/wm/util/window-outline.jl
+++ b/lisp/sawfish/wm/util/window-outline.jl
@@ -155,7 +155,7 @@ drawn, currently it may only be `box' for a 3x3 grid."
(if (= pta-x ptb-x)
(progn ; vertical
(if dim-p
- (x-draw-string rw gc (cons (+ pta-x x-dim-offset)
+ (x-draw-text rw gc (cons (+ pta-x x-dim-offset)
(+ pta-y (quotient delta-y 2))
)
(format nil "%d" delta-y)))
@@ -169,7 +169,7 @@ drawn, currently it may only be `box' for a 3x3 grid."
)
(progn ; horizontal
(if dim-p
- (x-draw-string rw gc (cons (+ pta-x (quotient delta-x 2))
+ (x-draw-text rw gc (cons (+ pta-x (quotient delta-x 2))
(- pta-y y-dim-offset)
)
(format nil "%d" delta-x)))
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]