<87k482l3hf....@interalia.com>
<20111020184334.7fa3384...@maild.rambler.ru>)
Mime-Version: 1.0
Content-type: text/plain; charset="UTF-8"

>"Michael Raskin" <38a93...@rambler.ru> writes:
>
>> <20111020161317.47c5384...@maild.rambler.ru>)
>> Mime-Version: 1.0
>> Content-type: text/plain; charset="UTF-8"
>>
>>>"Michael Raskin" <38a93...@rambler.ru> writes:
>>>> I recommend putting this into .stumpwmrc - so you will not lose it 
>>>> across StumpWM updates. Whether it is a good change for mainline, I am
>>>> not sure...
>>>
>>>Yup, I put it into my .stumpwmrc.  As for mainline, I would have found
>>>it a useful default behaviour and I'm sure that I'm not the only one
>>>that uses :sloppy.
>>
>> People who use :sloppy, please say what should move-focus do.
>>
>> Where should it put ratcursor? I would see the point of window center,
>> top-left corner and the middle of the top side. I guess that to make
>> this configurable (if needed), we'd need to know what would different
>> people like.
>
>I put the cursor in the top left corner after trying to place it in the
>middle.  I couldn't get putting the cursor in the center to work
>reliably so I just stuck it in the left hand corner with an offset which
>seemed to work fine.

Your code relies on minimal frame size, I guess

And centering is not hard:

(defcommand 
  ratcenter () ()
  "Center the mouse pointer in current frame"
  (let*
    ((f (tile-group-current-frame (current-group)))
     (ml (head-mode-line (current-head (current-group))))
     (ml-height (if ml (mode-line-height ml) 0))
     (cx (+ (frame-x f) (ash (frame-width f) -1)))
     (cy (+ ml-height (frame-y f) (ash (frame-height f) -1))))
    (ratwarp cx cy)))





_______________________________________________
Stumpwm-devel mailing list
Stumpwm-devel@nongnu.org
https://lists.nongnu.org/mailman/listinfo/stumpwm-devel

Reply via email to