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
|
