projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
8960c4e
)
show deb pkg version
author
Ivan Kohler
<ivan@freeside.biz>
Thu, 19 Sep 2019 02:15:46 +0000
(19:15 -0700)
committer
Ivan Kohler
<ivan@freeside.biz>
Thu, 19 Sep 2019 02:15:46 +0000
(19:15 -0700)
httemplate/view/Status.html
patch
|
blob
|
history
diff --git
a/httemplate/view/Status.html
b/httemplate/view/Status.html
index
af58f35
..
dbe08b5
100644
(file)
--- a/
httemplate/view/Status.html
+++ b/
httemplate/view/Status.html
@@
-30,6
+30,14
@@
if ( ! $@ && $os =~ /^\s*Description:\s*(.+)$/ ) {
$os = "Debian $deb_version";
}
$os = "Debian $deb_version";
}
+my $pkg_version = '';
+-e '/usr/bin/dpkg-query'
+ and run( ['/usr/bin/dpkg-query',
+ '--showformat=${Version}', '--show', 'freeside'
+ ],
+ '>', \$pkg_version
+ );
+
( my $perl_ver = $^V ) =~ s/^v//;
my $db = driver_name;
( my $perl_ver = $^V ) =~ s/^v//;
my $db = driver_name;
@@
-58,6
+66,13
@@
tie my %status, 'Tie::IxHash',
{ 'title' => 'Freeside version',
'value' => $FS::VERSION,
},
{ 'title' => 'Freeside version',
'value' => $FS::VERSION,
},
+ ( length($pkg_version)
+ ? ( { 'title' => 'Package version',
+ 'value' => $pkg_version,
+ },
+ )
+ : ()
+ ),
{ 'title' => 'Operating System',
'value' => $os,
},
{ 'title' => 'Operating System',
'value' => $os,
},