WikiPatches/ExtendedActionVersion

More detailed information about the system and environment. Based on OddMuse core code.

sub DoShowVersion {
  print &GetHeader('', T('Displaying Wiki Version'), '');
  print "<p>UseModWiki version 1.0.4</p>\n";
  + print '<br>';
  + print $q->p($q->server_software());
  + print $q->p(sprintf('Perl v%vd', $^V));
  + print $q->p($ENV{MOD_PERL} ? $ENV{MOD_PERL} : "no mod_perl");
  + print $q->p('CGI: ', $CGI::VERSION);
  + print $q->p('LWP::UserAgent ', eval { local $SIG{__DIE__};
  + require LWP::UserAgent; $LWP::UserAgent::VERSION; });
  + print $q->p('diff: ' . (`diff --version` || $!));
  print &GetCommonFooter();
}

--JuanmaMP