summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2001-01-09 23:33:21 +0000
committerPascal Rigaux <pixel@mandriva.com>2001-01-09 23:33:21 +0000
commit42e7b3f9097c8a13ca8d9e79723a43bce29a224b (patch)
tree804d0fe1ab58a54423b342efc8286c50e3ca0629 /perl-install
parent70445f1b7bc94d9d1f4f095391ab93f1e6de72ee (diff)
downloaddrakx-backup-do-not-use-42e7b3f9097c8a13ca8d9e79723a43bce29a224b.tar
drakx-backup-do-not-use-42e7b3f9097c8a13ca8d9e79723a43bce29a224b.tar.gz
drakx-backup-do-not-use-42e7b3f9097c8a13ca8d9e79723a43bce29a224b.tar.bz2
drakx-backup-do-not-use-42e7b3f9097c8a13ca8d9e79723a43bce29a224b.tar.xz
drakx-backup-do-not-use-42e7b3f9097c8a13ca8d9e79723a43bce29a224b.zip
(drakx_version): nicer (4gc)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/any.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index fe9d05282..4cdc24e83 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -17,6 +17,10 @@ use run_program;
use modules;
use log;
+sub drakx_version {
+ sprintf "DrakX v%s built %s", $::testing ? ('TEST', scalar gmtime()) : (split('/', cat_("/usr/share/VERSION")))[2,3];
+}
+
sub facesdir {
my ($prefix) = @_;
"$prefix/usr/share/faces/";