display Perl @INC on about page

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
This commit is contained in:
Galen Charlton 2008-02-13 13:03:10 -06:00 committed by Joshua Ferraro
parent 34192bb2e2
commit d23c0a80bd
2 changed files with 6 additions and 0 deletions

View file

@ -50,6 +50,7 @@ $template->param(
kohaVersion => $kohaVersion,
osVersion => $osVersion,
perlVersion => $perlVersion,
perlIncPath => [ map { perlinc => $_ }, sort @INC ],
mysqlVersion => $mysqlVersion,
apacheVersion => $apacheVersion,
zebraVersion => $zebraVersion,

View file

@ -35,6 +35,11 @@
<tr><th scope="row">Koha version: </th><td><!-- TMPL_VAR ESCAPE="HTML" name="kohaVersion" --></td></tr>
<tr><th scope="row">OS version ('uname -a'): </th><td><!-- TMPL_VAR ESCAPE="HTML" name="osVersion" --></td></tr>
<tr><th scope="row">Perl version: </th><td><!-- TMPL_VAR ESCAPE="HTML" name="perlVersion" --></td></tr>
<tr><th scope="row">Perl @INC: </th><td>
<!-- TMPL_LOOP name="perlIncPath" -->
<!-- TMPL_VAR ESCAPE="HTML" name="perlinc" --> <br />
<!-- /TMPL_LOOP -->
</td></tr>
<tr><th scope="row">MySQL version: </th><td><!-- TMPL_VAR ESCAPE="HTML" name="mysqlVersion" --></td></tr>
<tr><th scope="row">Apache version: </th><td><!-- TMPL_VAR ESCAPE="HTML" name="apacheVersion" --></td></tr>
<tr><th scope="row">Zebra version: </th><td><!-- TMPL_VAR ESCAPE="HTML" name="zebraVersion" --></td></tr>