Commit d2f27357 authored by Karl Heuer's avatar Karl Heuer
Browse files

(winner-change-fun): Don't use pushnew.

parent 335406fc
......@@ -81,7 +81,8 @@ which excludes \"invisible buffers\".")
(defvar winner-modified-list nil)
(defun winner-change-fun ()
(pushnew (selected-frame) winner-modified-list))
(or (memq (selected-frame) winner-modified-list)
(push (selected-frame) winner-modified-list)))
(defun winner-save-new-configurations ()
(while winner-modified-list
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment