/[emacs]/emacs/lisp/play/handwrite.el
ViewVC logotype

Diff of /emacs/lisp/play/handwrite.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.11 by lektu, Thu May 16 11:57:58 2002 UTC revision 1.11.2.1 by miles, Fri Apr 4 06:20:31 2003 UTC
# Line 143  Variables: handwrite-linespace     (defa Line 143  Variables: handwrite-linespace     (defa
143        ((pmin)                           ; thanks, Havard        ((pmin)                           ; thanks, Havard
144         (lastp)         (lastp)
145         (cur-buf (current-buffer))         (cur-buf (current-buffer))
146         (tpoint (point))         (tpoint (point))
147         (ps-ypos 63)         (ps-ypos 63)
148         (lcount 0)         (lcount 0)
149         (ipage 1)         (ipage 1)
# Line 175  Variables: handwrite-linespace     (defa Line 175  Variables: handwrite-linespace     (defa
175      (switch-to-buffer cur-buf)      (switch-to-buffer cur-buf)
176      (goto-char (point-min))             ;start at beginning      (goto-char (point-min))             ;start at beginning
177      (save-excursion      (save-excursion
178        ;;as long as we see a newline the document is not ended.          ;;as long as we see a newline the document is not ended.
179        (while (re-search-forward "\n" nil t)        (while (re-search-forward "\n" nil t)
180          (previous-line 1)          (previous-line 1)
181          (beginning-of-line)          (beginning-of-line)
# Line 1375  end Line 1375  end
1375  ;; Key bindings  ;; Key bindings
1376    
1377    
1378  ;;; I'd rather not fill up the menu bar menus with  ;;; I'd rather not fill up the menu bar menus with
1379  ;;; lots of random miscellaneous features. -- rms.  ;;; lots of random miscellaneous features. -- rms.
1380  ;;;(define-key-after  ;;;(define-key-after
1381  ;;;  (lookup-key global-map [menu-bar edit])  ;;;  (lookup-key global-map [menu-bar edit])

Legend:
Removed from v.1.11  
changed lines
  Added in v.1.11.2.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26