search

HiTECNOLOGYs / cl-charms

More up-to-date version of cl-charms. Forked it because it was, apparently, abandoned by author and I couldn't contact him.
https://gitorious.org/cl-charms
Other
158 stars 29 forks source link

Add T as an alias for *STANDARD-WINDOW* #38

Closed sjl closed 7 years ago

sjl commented 7 years ago

Fixes https://github.com/HiTECNOLOGYs/cl-charms/issues/34

This is a little verbose. An alternative would be to make a defun-window macro to hide the resolving, but I'm not sure I like that magicness.

Something else to consider: instead of a simple if, we could implement resolve-window like this:

(defun resolve-window (window-designator)
  (etypecase window-designator
    ((eql t) *standard-window*)
    (window window-designator)))

This would give a nicer error message if a user passes in something that's not either a window or t, but would be a bit more expensive in every single call. I have no strong feelings either way.