[elpa] externals/objed 47ff6db 207/216: Provide default for replace-op

[Stefan Monnier]

branch: externals/objed
commit 47ff6db1de20bd8d3de7e951a5be22fce3e6adc6
Author: Clemera <address@hidden>
Commit: Clemera <address@hidden>

    Provide default for replace-op
---
 objed.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/objed.el b/objed.el
index 973ef4d..f84d723 100644
--- a/objed.el
+++ b/objed.el
@@ -2566,7 +2566,9 @@ replacement."
   (interactive
    (let ((beg (region-beginning))
          (end (region-end)))
-     (list beg end (read-string "Replace with: "))))
+     (list beg end
+           (read-string "Replace with: "
+                        nil nil (buffer-substring beg end)))))
   (delete-region beg end)
   (insert str))