diff options
Diffstat (limited to 'lisp/woman.el')
| -rw-r--r-- | lisp/woman.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/woman.el b/lisp/woman.el index 55396f607eb..13fa3147487 100644 --- a/lisp/woman.el +++ b/lisp/woman.el @@ -2657,9 +2657,9 @@ If DELETE is non-nil then delete from point." (error "File `%s' not found" name)) (beginning-of-line) (woman-delete-line 1) - (let ((from (point)) - (length (woman-insert-file-contents filename 0)) - (to (copy-marker (+ from length) t))) + (let* ((from (point)) + (length (woman-insert-file-contents filename 0)) + (to (copy-marker (+ from length) t))) (woman-pre-process-region from to) (set-marker to nil) (goto-char from) @@ -3971,7 +3971,7 @@ Optional argument NUMERIC, if non-nil, means the argument is numeric." (delete-char 1) (looking-at "\\(.\\)\\(.*\\)\\1") (forward-char 1) - (let* ((to (match-end 2))) + (let* ((to (match-end 2)) (from (match-beginning 0)) (N (woman-parse-numeric-arg)) (c (if (< (point) to) (following-char) ?_))) |