Fix compilation warnings
This commit is contained in:
parent
39b3129f37
commit
842b5c3a8d
@ -47,7 +47,7 @@
|
|||||||
(defun origami-get-positions (content regex)
|
(defun origami-get-positions (content regex)
|
||||||
(with-temp-buffer
|
(with-temp-buffer
|
||||||
(insert content)
|
(insert content)
|
||||||
(beginning-of-buffer)
|
(goto-char (point-min))
|
||||||
(let (acc)
|
(let (acc)
|
||||||
(while (re-search-forward regex nil t)
|
(while (re-search-forward regex nil t)
|
||||||
(let ((match (match-string 0)))
|
(let ((match (match-string 0)))
|
||||||
@ -92,7 +92,7 @@
|
|||||||
(lambda (content)
|
(lambda (content)
|
||||||
(with-temp-buffer
|
(with-temp-buffer
|
||||||
(insert content)
|
(insert content)
|
||||||
(beginning-of-buffer)
|
(goto-char (point-min))
|
||||||
(beginning-of-defun -1)
|
(beginning-of-defun -1)
|
||||||
(let (beg end offset acc)
|
(let (beg end offset acc)
|
||||||
(while (< (point) (point-max))
|
(while (< (point) (point-max))
|
||||||
|
Loading…
Reference in New Issue
Block a user