[Lxr-commits] CVS: lxr/scripts QuestionAnswer.pm,1.1,1.2

[Andre-Littoz <ajl...@us...>]

Update of /cvsroot/lxr/lxr/scripts
In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv23321/scripts

Modified Files:
	QuestionAnswer.pm 
Log Message:
scripts/QuestionAnswer.pm: make question more easily visible

Add blinking > at end of question

Index: QuestionAnswer.pm
===================================================================
RCS file: /cvsroot/lxr/lxr/scripts/QuestionAnswer.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- QuestionAnswer.pm	22 Sep 2012 08:50:33 -0000	1.1
+++ QuestionAnswer.pm	4 Dec 2012 17:42:27 -0000	1.2
@@ -117,7 +117,7 @@
 		if (defined($choices) && @$choices) {
 			print " [${VTyellow}", join("${VTnorm}/${VTyellow}", @$choices), "${VTnorm}]";
 		}
-		print " ";
+		print " ${VTslow}${VTyellow}>${VTnorm} ";
 		my $userentry = <STDIN>;
 		chomp($userentry);
 		#	See if user just hit "return"; if this is valid, give