# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1177186009 0
# Node ID 4d2d90c19454c6f195e3e4f2e75e7a72669923b0
# Parent  8f81ea536fbdae0c6b745f13c70dbde2451414fb
(perl-indent-command): Use delete-region instead of kill-region.

diff -r 8f81ea536fbd -r 4d2d90c19454 lisp/progmodes/perl-mode.el
--- a/lisp/progmodes/perl-mode.el	Sat Apr 21 20:06:41 2007 +0000
+++ b/lisp/progmodes/perl-mode.el	Sat Apr 21 20:06:49 2007 +0000
@@ -647,10 +647,10 @@
 		     (if (and comment-start-skip
 			      (re-search-forward comment-start-skip eol 'move))
 			 (if (eolp)
-			     (progn	; kill existing comment
+			     (progn	; delete existing comment
 			       (goto-char (match-beginning 0))
 			       (skip-chars-backward " \t")
-			       (kill-region (point) eol))
+			       (delete-region (point) eol))
 			   (if (or (< oldpnt (point)) (= oldpnt eol))
 			       (indent-for-comment) ; indent existing comment
 			     (end-of-line)))