diff options
| author | Stefan Monnier | 2002-09-27 19:51:58 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2002-09-27 19:51:58 +0000 |
| commit | 3004cff449ee1854b66bb26e2ffb082a12885d28 (patch) | |
| tree | d221f05bab5549349419a182e7c1cdeed1726435 | |
| parent | 4d927d8475ff15778cd8c37d64b8b22973de6403 (diff) | |
| download | emacs-3004cff449ee1854b66bb26e2ffb082a12885d28.tar.gz emacs-3004cff449ee1854b66bb26e2ffb082a12885d28.zip | |
(write-abbrev-file): Don't hardcode point-min == 1.
| -rw-r--r-- | lisp/abbrev.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/abbrev.el b/lisp/abbrev.el index 8e6b3ae69d8..a73c8e0fe8d 100644 --- a/lisp/abbrev.el +++ b/lisp/abbrev.el | |||
| @@ -219,7 +219,7 @@ The argument FILE is the file name to write." | |||
| 219 | (while tables | 219 | (while tables |
| 220 | (insert-abbrev-table-description (car tables) nil) | 220 | (insert-abbrev-table-description (car tables) nil) |
| 221 | (setq tables (cdr tables)))) | 221 | (setq tables (cdr tables)))) |
| 222 | (write-region 1 (point-max) file) | 222 | (write-region (point-min) (point-max) file) |
| 223 | (erase-buffer))) | 223 | (erase-buffer))) |
| 224 | 224 | ||
| 225 | (defun add-mode-abbrev (arg) | 225 | (defun add-mode-abbrev (arg) |