X-Git-Url: http://git.hungrycats.org/cgi-bin/gitweb.cgi?p=xscreensaver;a=blobdiff_plain;f=driver%2Fxscreensaver-text;h=4449f9c934b8db8ce85f559323ebe2313a0863db;hp=52f9f577b16562a82321686b6ecee4197f3f11e2;hb=0d6b320def9180cf907ceaed56b23a972a11b757;hpb=3f438031d610c7e15fd33876a879b97e290e05fb diff --git a/driver/xscreensaver-text b/driver/xscreensaver-text index 52f9f577..4449f9c9 100755 --- a/driver/xscreensaver-text +++ b/driver/xscreensaver-text @@ -24,7 +24,7 @@ use Text::Wrap qw(wrap); use bytes; my $progname = $0; $progname =~ s@.*/@@g; -my $version = q{ $Revision: 1.5 $ }; $version =~ s/^[^0-9]+([0-9.]+).*$/$1/; +my $version = q{ $Revision: 1.6 $ }; $version =~ s/^[^0-9]+([0-9.]+).*$/$1/; my $verbose = 0; my $http_proxy = undef; @@ -282,7 +282,8 @@ sub output() { } elsif ($text_mode eq 'program') { - $text_program = which ($text_program); + my ($prog, $args) = ($text_program =~ m/^([^\s]+)(.*)$/); + $text_program = which ($prog) . $args; print STDERR "$progname: running $text_program\n" if ($verbose); if ($wrap_columns && $wrap_columns > 0) {