Japanese translation of message catalog for Sawfish Window-Manager
| 修订版 | 4a6b5fa73ca2be5400a7d2c9dd3b5fc54518be39 (tree) |
|---|---|
| 时间 | 2010-12-09 13:55:55 |
| 作者 | Michal Maruska <mmaruska@gmai...> |
| Commiter | Michal Maruska |
display-window ... change viewport (on the same WS)
lisp/sawfish/wm/util/display-window.jl (diff)| @@ -57,7 +57,8 @@ unshaded if necessary." | ||
| 57 | 57 | (not (window-in-workspace-p w preferred-space))) |
| 58 | 58 | (setq preferred-space |
| 59 | 59 | (nearest-workspace-with-window w current-workspace))) |
| 60 | - (if preferred-space | |
| 60 | + (if (and preferred-space | |
| 61 | + (not (= preferred-space current-workspace))) | |
| 61 | 62 | (select-workspace preferred-space will-refocus |
| 62 | 63 | (lambda () |
| 63 | 64 | (raise-window* w) |
Fork
SawfishWM/sawfish