[sawfish: 2/42] better version of previous commit



commit 429b279f59b39b4edff55ed648342ecb0d6b2bba
Author: Christopher Roy Bratusek <nano tuxfamily org>
Date:   Tue Apr 5 13:13:18 2011 +0200

    better version of previous commit

 lisp/sawfish/wm/commands/jump-or-exec.jl |    6 +++---
 1 files changed, 3 insertions(+), 3 deletions(-)
---
diff --git a/lisp/sawfish/wm/commands/jump-or-exec.jl b/lisp/sawfish/wm/commands/jump-or-exec.jl
index 925a5e6..19a925d 100644
--- a/lisp/sawfish/wm/commands/jump-or-exec.jl
+++ b/lisp/sawfish/wm/commands/jump-or-exec.jl
@@ -48,9 +48,9 @@
 	  (curwin (input-focus)))
       (cond ((and onfocused
 		  curwin
-		  (if match-class
-		      (and (window-class curwin)
-			   (string-match regex (window-class curwin)))
+		  (if (and match-class
+		           (window-class curwin))
+			     (string-match regex (window-class curwin))
 		    (string-match regex (window-name curwin))))
 	     ;; Exec "onfocused"
 	     (cond ((commandp onfocused)



[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]