Commits

Anonymous committed bccc950

2004-12-08 Steve Youngs <steve@youngs.au.com>

* lisp/xwem-misc.el (xwem-misc-find-cl-by-emacs-frame): Fix
logic... a when statement was closed too soon.

Comments (0)

Files changed (2)

+2004-12-08  Steve Youngs  <steve@youngs.au.com>
+
+	* lisp/xwem-misc.el (xwem-misc-find-cl-by-emacs-frame): Fix
+	logic... a when statement was closed too soon.
+
 2004-12-07  Zajcev Evgeny  <zevlg@yandex.ru>
 
 	* lisp/xwem-keyboard.el (xwem-kbd-xksym->emacs):

lisp/xwem-misc.el

         wm-class xtr rcl)
     (while clients
       (setq wm-class (xwem-hints-wm-class (xwem-cl-hints (car clients))))
-      (when (string= (cdr wm-class) x-emacs-application-class))
+      (when (string= (cdr wm-class) x-emacs-application-class)
         (setq xtr (XQueryTree (xwem-dpy) (xwem-cl-xwin (car clients))))
         (if (car xtr)
             (setq xtr (mapcar 'X-Win-id (cdr (cdr (cdr (cdr xtr))))))
           (setq clients nil)))
 
       (setq clients (cdr clients)))
-    rcl)
+    rcl))
 
 ;;;###xwem-autoload
 (defun xwem-misc-xwin-valid-p (xwin)