Fix compilation warnings
This commit is contained in:
		| @@ -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)) | ||||||
|   | |||||||
		Reference in New Issue
	
	Block a user