el/dot-emacs.el: Bug fix to last-one-out.

[profile] / el / dot-emacs.el

diff --git a/el/dot-emacs.el b/el/dot-emacs.el
index 404233ba7b475803e0b937bd24dc46e7cbf6d696..f4cfadb8e9d08f610ff725565e2e63b978289a2f 100644 (file)
--- a/el/dot-emacs.el
+++ b/el/dot-emacs.el
@@ -730,7 +730,7 @@ (defun mdw-last-one-out-turn-off-the-lights (frame)
               (not (some (lambda (fr)
                            (message "checking frame %s" frame)
                            (and (not (eq fr frame))
-                                (string= (frame-parameter frame 'display)
+                                (string= (frame-parameter fr 'display)
                                          frame-display)
                                 (progn "frame %s still uses us" nil)))
                          (frame-list))))