X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/9e2de34d6c42dc54148303b334dea23e630be2ba..af29d76895249c56a4edb12c086db19ce8f218d3:/packages/yasnippet/snippets/emacs-lisp-mode/x-find-replace.yasnippet diff --git a/packages/yasnippet/snippets/emacs-lisp-mode/x-find-replace.yasnippet b/packages/yasnippet/snippets/emacs-lisp-mode/x-find-replace.yasnippet index e5a1d6c39..b0c58ec21 100644 --- a/packages/yasnippet/snippets/emacs-lisp-mode/x-find-replace.yasnippet +++ b/packages/yasnippet/snippets/emacs-lisp-mode/x-find-replace.yasnippet @@ -6,7 +6,7 @@ "Replace “<” to “<” and other chars in HTML. This works on the current region." (interactive "r") - (save-restriction + (save-restriction (narrow-to-region start end) (goto-char (point-min)) (while (search-forward "&" nil t) (replace-match "&" nil t))