# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 977513753 0
# Node ID 196128ac70b3db0fbb4741e81b7c3343333420fb
# Parent  78dd0bae5478e079da5a74a0470f86973752b9f2
(skeleton-internal-1): Make sure the first line of
the region is also re-indented.

diff -r 78dd0bae5478 -r 196128ac70b3 lisp/skeleton.el
--- a/lisp/skeleton.el	Fri Dec 22 16:26:40 2000 +0000
+++ b/lisp/skeleton.el	Fri Dec 22 19:35:53 2000 +0000
@@ -426,7 +426,8 @@
 	((eq element '>)
 	 (if (and skeleton-regions
 		  (eq (nth 1 skeleton) '_))
-	     (indent-region (point) (car skeleton-regions) nil)
+	     (indent-region (line-beginning-position)
+			    (car skeleton-regions) nil)
 	   (indent-according-to-mode)))
 	((eq element '_)
 	 (if skeleton-regions