projects
/
xscreensaver
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
ftp://ftp.krokus.ru/pub/OpenBSD/distfiles/xscreensaver-5.01.tar.gz
[xscreensaver]
/
driver
/
xscreensaver-text
diff --git
a/driver/xscreensaver-text
b/driver/xscreensaver-text
index 2586a89ddf0a83bed6c462f379c31b997fcf008d..e6a00226863743cca1e138b8051957ebafa38de7 100755
(executable)
--- a/
driver/xscreensaver-text
+++ b/
driver/xscreensaver-text
@@
-29,7
+29,7
@@
use Text::Wrap qw(wrap);
use bytes;
my $progname = $0; $progname =~ s@.*/@@g;
use bytes;
my $progname = $0; $progname =~ s@.*/@@g;
-my $version = q{ $Revision: 1.1
3
$ }; $version =~ s/^[^0-9]+([0-9.]+).*$/$1/;
+my $version = q{ $Revision: 1.1
4
$ }; $version =~ s/^[^0-9]+([0-9.]+).*$/$1/;
my $verbose = 0;
my $http_proxy = undef;
my $verbose = 0;
my $http_proxy = undef;
@@
-374,6
+374,10
@@
sub output() {
system ("cat", "/etc/redhat-release");
}
system ("cat", "/etc/redhat-release");
}
+ if (-f "/etc/release") { # "Solaris 10 3/05 s10_74L2a X86"
+ safe_system ("head", "-1", "/etc/release");
+ }
+
if (-f "/usr/sbin/system_profiler") { # "Mac OS X 10.4.5 (8H14)"
my $sp = # "iMac G5"
`/usr/sbin/system_profiler SPSoftwareDataType SPHardwareDataType`;
if (-f "/usr/sbin/system_profiler") { # "Mac OS X 10.4.5 (8H14)"
my $sp = # "iMac G5"
`/usr/sbin/system_profiler SPSoftwareDataType SPHardwareDataType`;