Update of /cvsroot/fink/fink
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13108

Modified Files:
        ChangeLog bootstrap.pl 
Log Message:
Add a new "intro" param to prompt_selection.


Index: bootstrap.pl
===================================================================
RCS file: /cvsroot/fink/fink/bootstrap.pl,v
retrieving revision 1.60
retrieving revision 1.61
diff -u -d -r1.60 -r1.61
--- bootstrap.pl        13 Feb 2005 19:07:50 -0000      1.60
+++ bootstrap.pl        24 Feb 2005 20:32:53 -0000      1.61
@@ -56,7 +56,7 @@
 
 if ("$]" == "5.006001") {
     if (not -x "/usr/bin/perl5.6.1") {
-die "\nYou have an incomplete perl installation; you are missing 
/usr/bin/perl5.6.1.\n\nYou must repair this problem before installing 
Fink.\n\n"} 
+       die "\nYou have an incomplete perl installation; you are missing 
/usr/bin/perl5.6.1.\n\nYou must repair this problem before installing 
Fink.\n\n"} 
     elsif (system "/usr/bin/perl5.6.1 -V") {
        die "\nYour /usr/bin/perl5.6.1 is not functional; you must repair this 
problem\nbefore installing Fink.\n\n"}
 }
@@ -122,14 +122,14 @@
 
 my ($rootmethod);
 if ($> != 0) {
-       print "\n";
-       &print_breaking("Fink must be installed and run with superuser (root) ".
-                                       "privileges. Fink can automatically try 
to become ".
-                                       "root when it's run from a user 
account. Since you're ".
-                                       "currently running this script as a 
normal user, the ".
-                                       "method you choose will also be used 
immediately for ".
-                                       "this script. Avaliable methods:");
+       my $sel_intro = "Fink must be installed and run with superuser (root) ".
+           "privileges. Fink can automatically try to become ".
+           "root when it's run from a user account. Since you're ".
+           "currently running this script as a normal user, the ".
+           "method you choose will also be used immediately for ".
+           "this script. Avaliable methods:";
        $answer = &prompt_selection("Choose a method:",
+                                       intro   => $sel_intro,
                                        default => [ value => "sudo" ],
                                        choices => [
                                          "Use sudo" => "sudo",

Index: ChangeLog
===================================================================
RCS file: /cvsroot/fink/fink/ChangeLog,v
retrieving revision 1.304
retrieving revision 1.305
diff -u -d -r1.304 -r1.305
--- ChangeLog   24 Feb 2005 00:15:19 -0000      1.304
+++ ChangeLog   24 Feb 2005 20:32:52 -0000      1.305
@@ -1,3 +1,7 @@
+2005-02-24  Daniel Macks  <[EMAIL PROTECTED]>
+
+       * bootstrap.pl: Use new "intro" param to prompt_selection
+
 2005-02-23  Dave Morrison  <[EMAIL PROTECTED]>
 
        * VERSION: Bumped package manager version to 0.24.0, a new release



-------------------------------------------------------
SF email is sponsored by - The IT Product Guide
Read honest & candid reviews on hundreds of IT Products from real users.
Discover which products truly live up to the hype. Start reading now.
http://ads.osdn.com/?ad_id=6595&alloc_id=14396&op=click
_______________________________________________
Fink-commits mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/fink-commits

Reply via email to