From 25a6866d85138cb37af91a63beb115987053cbb3 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Zden=C4=9Bk=20=C5=A0ustr?= <sustr4@cesnet.cz>
Date: Fri, 18 Mar 2011 11:06:22 +0000
Subject: [PATCH] When editing ChangeLog position the cursor to the new tag and
 redraw screen so that it's in the midlle.

---
 org.glite.lb/etics-tag.pl | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

diff --git a/org.glite.lb/etics-tag.pl b/org.glite.lb/etics-tag.pl
index 7c17732..9c05576 100755
--- a/org.glite.lb/etics-tag.pl
+++ b/org.glite.lb/etics-tag.pl
@@ -230,12 +230,7 @@ usage: $0 [-i maj|min|rev|age|none|<sigle_word_age>] [-g] [-c <current configura
 			if ($increment eq "a") {system("echo \"- Module rebuilt\" >> $tmpChangeLog"); system("echo \"\" >> $tmpChangeLog");}
 			else { system("cvs log -S -N -r" . "$current_tag" . ":: $module | egrep -v \"^locks:|^access list:|^keyword substitution:|^total revisions:|^branch:|^description:|^head:|^RCS file:|^date:|^---|^===|^revision \" >> $tmpChangeLog"); }
 				
-			$lastline=`cat $tmpChangeLog | wc -l`;
-			chomp($lastline);
-
-			printf("vim +$lastline +$editline $tmpChangeLog\n");
-
-			$ChangeLogRet=system("vim +$editline $tmpChangeLog");
+			$ChangeLogRet=system("vim +$editline -c \"norm z.\" $tmpChangeLog");
 		}
 		printf("Modified ChangeLog ready, ret code: $ChangeLogRet\n");
 
-- 
1.8.2.3