<pre style='margin:0'>
Rainer Müller (raimue) pushed a commit to branch master
in repository macports-base.
</pre>
<p><a href="https://github.com/macports/macports-base/commit/0e7cd5f7bd54ac200bb3473b868c89edba668bf0">https://github.com/macports/macports-base/commit/0e7cd5f7bd54ac200bb3473b868c89edba668bf0</a></p>
<pre style="white-space: pre; background: #F8F8F8"><span style='display:block; white-space:pre;color:#808000;'>commit 0e7cd5f7bd54ac200bb3473b868c89edba668bf0
</span>Author: Rainer Müller <raimue@macports.org>
AuthorDate: Sat Nov 5 03:06:31 2016 +0100
<span style='display:block; white-space:pre;color:#404040;'> UpdateVCS: consolidate debug messages
</span>---
src/macports1.0/macports.tcl | 8 ++------
1 file changed, 2 insertions(+), 6 deletions(-)
<span style='display:block; white-space:pre;color:#808080;'>diff --git a/src/macports1.0/macports.tcl b/src/macports1.0/macports.tcl
</span><span style='display:block; white-space:pre;color:#808080;'>index 6443fd6..1e06c4d 100644
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>--- a/src/macports1.0/macports.tcl
</span><span style='display:block; white-space:pre;background:#e0e0ff;'>+++ b/src/macports1.0/macports.tcl
</span><span style='display:block; white-space:pre;background:#e0e0e0;'>@@ -2455,25 +2455,21 @@ proc macports::UpdateVCS {cmd portDir} {
</span> set oldEGID [getegid]
set newEGID [name_to_gid [file attributes $portDir -group]]
setegid $newEGID
<span style='display:block; white-space:pre;background:#ffe0e0;'>- ui_debug "Changed effective group ID from $oldEGID to $newEGID"
</span> set oldEUID [geteuid]
set newEUID [name_to_uid [file attributes $portDir -owner]]
seteuid $newEUID
<span style='display:block; white-space:pre;background:#ffe0e0;'>- ui_debug "Changed effective user ID from $oldEUID to $newEUID"
</span> set oldHOME $env(HOME)
set newHOME [getpwuid $newEUID dir]
set env(HOME) $newHOME
<span style='display:block; white-space:pre;background:#ffe0e0;'>- ui_debug "Changed HOME to $newHOME"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ ui_debug "euid/egid changed to: $newEUID/$newEGID, HOME changed to: $newHOME"
</span> }
ui_debug $cmd
catch {system $cmd} result options
if {[getuid] == 0} {
seteuid $oldEUID
<span style='display:block; white-space:pre;background:#ffe0e0;'>- ui_debug "Changed effective user ID from $newEUID to $oldEUID"
</span> setegid $oldEGID
<span style='display:block; white-space:pre;background:#ffe0e0;'>- ui_debug "Changed effective group ID from $newEGID to $oldEGID"
</span> set env(HOME) $oldHOME
<span style='display:block; white-space:pre;background:#ffe0e0;'>- ui_debug "Changed HOME to $oldHOME"
</span><span style='display:block; white-space:pre;background:#e0ffe0;'>+ ui_debug "euid/egid restored to: $oldEUID/$oldEGID, HOME restored to: $oldHOME"
</span> }
return -options $options $result
}
</pre><pre style='margin:0'>
</pre>