[otrs-cvs] Support/Kernel/System/Support OS.pm,1.28,1.29
"CVS commits notifications of OTRS.org" <[email protected]>
| Newsgroups | gmane.comp.otrs.cvs |
|---|---|
| Message-ID | <[email protected]> |
Comments:
Update of /home/cvs/Support/Kernel/System/Support
In directory lancelot:/tmp/cvs-serv23113/Kernel/System/Support
Modified Files:
OS.pm
Log Message:
- Removed ANSI output from CheckModules results.
- Use $^X to get the *current* perl instead of the one in path.
Author: mb
Index: OS.pm
===================================================================
RCS file: /home/cvs/Support/Kernel/System/Support/OS.pm,v
retrieving revision 1.28
retrieving revision 1.29
diff -2 -u -d -r1.28 -r1.29
--- OS.pm 21 Dec 2012 14:22:41 -0000 1.28
+++ OS.pm 16 Jan 2013 09:38:02 -0000 1.29
@@ -1,5 +1,5 @@
# --
# Kernel/System/Support/OS.pm - all required system information
-# Copyright (C) 2001-2012 OTRS AG, http://otrs.org/
+# Copyright (C) 2001-2013 OTRS AG, http://otrs.org/
# --
# $Id$
@@ -273,8 +273,8 @@
my $TmpSumString;
- if ( open( $TmpSumString, "perl $Home/bin/otrs.CheckModules.pl |" ) ) {
+ if ( open( $TmpSumString, "$^X $Home/bin/otrs.CheckModules.pl nocolors |" ) ) {
my $TmpLog;
- open( $TmpSumString, "perl $Home/bin/otrs.CheckModules.pl |" );
+ open( $TmpSumString, "$^X $Home/bin/otrs.CheckModules.pl nocolors |" );
while (<$TmpSumString>) {
---------------------------------------------------------------------
OTRS mailing list: cvs-log - Webpage: http://otrs.org/
Archive: http://lists.otrs.org/pipermail/cvs-log
To unsubscribe: http://lists.otrs.org/cgi-bin/listinfo/cvs-log