Commit da37d01f authored by Juanma Barranquero's avatar Juanma Barranquero
Browse files

(woman0-so): Use `let*', not `let'.

(woman-horizontal-line): Remove unbalanced parenthesis.
parent 8cc8239e
2006-09-22 Juanma Barranquero <lekktu@gmail.com>
* woman.el (woman0-so): Use `let*', not `let'.
(woman-horizontal-line): Remove unbalanced parenthesis.
2006-09-22 Stefan Monnier <monnier@iro.umontreal.ca>
 
* woman.el: Make sure all the end-of-region markers we use have
......
......@@ -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) ?_)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment