diff --git a/emacs/.emacs.d/prot-emacs.org b/emacs/.emacs.d/prot-emacs.org
index 1e9a4ad6..d36bb9a8 100644
--- a/emacs/.emacs.d/prot-emacs.org
+++ b/emacs/.emacs.d/prot-emacs.org
@@ -15637,11 +15637,9 @@ BOUNDARIES is a cons cell representing buffer positions."
     (error "`%s' is not a cons cell" boundaries))
   (let ((beg (car boundaries))
         (end (cdr boundaries)))
-    (save-excursion
-      (goto-char end)
-      (newline)
-      (insert (buffer-substring-no-properties beg end))
-      (indent-for-tab-command))))
+    (goto-char end)
+    (newline)
+    (insert (buffer-substring-no-properties beg end))))
 
 ;;;###autoload
 (defun prot-simple-duplicate-line-or-region (&optional beg end)
diff --git a/emacs/.emacs.d/prot-lisp/prot-simple.el b/emacs/.emacs.d/prot-lisp/prot-simple.el
index bda4f980..36398bbc 100644
--- a/emacs/.emacs.d/prot-lisp/prot-simple.el
+++ b/emacs/.emacs.d/prot-lisp/prot-simple.el
@@ -224,11 +224,9 @@ BOUNDARIES is a cons cell representing buffer positions."
     (error "`%s' is not a cons cell" boundaries))
   (let ((beg (car boundaries))
         (end (cdr boundaries)))
-    (save-excursion
-      (goto-char end)
-      (newline)
-      (insert (buffer-substring-no-properties beg end))
-      (indent-for-tab-command))))
+    (goto-char end)
+    (newline)
+    (insert (buffer-substring-no-properties beg end))))
 
 ;;;###autoload
 (defun prot-simple-duplicate-line-or-region (&optional beg end)