Japanese translation of message catalog for Sawfish Window-Manager
| 修订版 | 89799cabc9e155461a064081accfc948d8966bbc (tree) |
|---|---|
| 时间 | 2015-06-13 02:14:20 |
| 作者 | Chris 'Nano' Bratusek <Nanolx@user...> |
| Commiter | Chris 'Nano' Bratusek |
Merge pull request #18 from mario-goulart/master
window-order.jl: window-order-most-recent: fix indentation
lisp/sawfish/wm/util/window-order.jl (diff)| @@ -90,7 +90,7 @@ function will restrict its search to the elements of this list." | ||
| 90 | 90 | (let loop ((rest (window-order current-workspace nil))) |
| 91 | 91 | (cond ((null rest) nil) |
| 92 | 92 | ((or (window-get (car rest) 'never-focus) |
| 93 | - (dock-window-p (car rest));; panel/pager workspace switcher | |
| 93 | + (dock-window-p (car rest));; panel/pager workspace switcher | |
| 94 | 94 | (and (listp windows) (not (memq (car rest) windows)))) |
| 95 | 95 | (loop (cdr rest))) |
| 96 | 96 | (t (car rest))))) |
Fork
SawfishWM/sawfish