# HG changeset patch # User Tassilo Horn # Date 1295210485 -3600 # Node ID c8102d1f162e4412ffa7aa8997f7cedf0de4da57 # Parent 941344101fc6826786d01933631a3955b3d47e2f * strokes.el (strokes-read-stroke): Re-fill strokes buffer with spaces if the frame was resized, so that the full visible buffer serves as canvas for strokes. diff -r 941344101fc6 -r c8102d1f162e lisp/ChangeLog --- a/lisp/ChangeLog Sun Jan 16 21:02:27 2011 +0100 +++ b/lisp/ChangeLog Sun Jan 16 21:41:25 2011 +0100 @@ -1,3 +1,9 @@ +2011-01-16 Tassilo Horn + + * strokes.el (strokes-read-stroke): Re-fill strokes buffer with + spaces if the frame was resized, so that the full visible buffer + serves as canvas for strokes. + 2011-01-16 Glenn Morris * info-xref.el (info-xref-docstrings): Replace cl function. diff -r 941344101fc6 -r c8102d1f162e lisp/strokes.el --- a/lisp/strokes.el Sun Jan 16 21:02:27 2011 +0100 +++ b/lisp/strokes.el Sun Jan 16 21:41:25 2011 +0100 @@ -736,6 +736,11 @@ ;; display the stroke as it's being read (save-window-excursion (set-window-configuration strokes-window-configuration) + ;; The frame has been resized, so we need to refill the + ;; strokes buffer so that the strokes canvas is the whole + ;; visible buffer. + (unless (> 1 (abs (- (line-end-position) (window-width)))) + (strokes-fill-current-buffer-with-whitespace)) (when prompt (message "%s" prompt) (setq event (read-event)) @@ -1000,7 +1005,7 @@ be running a version of Emacs with XPM support. You use the binding to `strokes-compose-complex-stroke' to start drawing your strokes. These are just complex strokes, and thus continue drawing with mouse-1 -or mouse-2 and end with mouse-3. Then the stroke image gets inserted +or mouse-2 and end with mouse-3. Then the stroke image gets inserted into the buffer. You treat it somewhat like any other character, which you can copy, paste, delete, move, etc. When all is done, you may want to send the file, or save it. This is done with