[138943] trunk/base/src

[raimue at macports.org]

Revision: 138943
          https://trac.macports.org/changeset/138943
Author:   raimue at macports.org
Date:     2015-07-24 13:35:45 -0700 (Fri, 24 Jul 2015)
Log Message:
-----------
pextlib1.0: Log all system commands at debug level
port1.0: Remove redundant logging

Modified Paths:
--------------
    trunk/base/src/pextlib1.0/system.c
    trunk/base/src/port1.0/portutil.tcl

Modified: trunk/base/src/pextlib1.0/system.c
===================================================================
--- trunk/base/src/pextlib1.0/system.c	2015-07-24 17:29:00 UTC (rev 138942)
+++ trunk/base/src/pextlib1.0/system.c	2015-07-24 20:35:45 UTC (rev 138943)
@@ -165,6 +165,13 @@
         }
     }
 
+    /* print debug command info */
+    if (path) {
+        ui_debug(interp, "system -W %s: %s", path, cmdstring);
+    } else {
+        ui_debug(interp, "system: %s", cmdstring);
+    }
+
     /* check if and how we should use sandbox-exec */
     sandbox = check_sandboxing(interp, &sandbox_exec_path, &profilestr);
 

Modified: trunk/base/src/port1.0/portutil.tcl
===================================================================
--- trunk/base/src/port1.0/portutil.tcl	2015-07-24 17:29:00 UTC (rev 138942)
+++ trunk/base/src/port1.0/portutil.tcl	2015-07-24 20:35:45 UTC (rev 138943)
@@ -367,7 +367,6 @@
         }
     }
 
-    ui_debug "Assembled command: '$cmdstring'"
     return $cmdstring
 }
 
@@ -450,7 +449,6 @@
     array set env [array get ${varprefix}.env_array]
     # Call the command.
     set fullcmdstring "$command_prefix $cmdstring $command_suffix"
-    ui_debug "Executing command line: $fullcmdstring"
     set code [catch {system {*}$notty {*}$nice $fullcmdstring} result]
     # Save variables in order to re-throw the same error code.
     set errcode $::errorCode
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.macosforge.org/pipermail/macports-changes/attachments/20150724/638d1a91/attachment.html>