[57691] users/ryandesign/minivmac/Portfile

[ryandesign at macports.org]

Revision: 57691
          http://trac.macports.org/changeset/57691
Author:   ryandesign at macports.org
Date:     2009-09-14 21:09:50 -0700 (Mon, 14 Sep 2009)
Log Message:
-----------
minivmac: show system commands in debug output

Modified Paths:
--------------
    users/ryandesign/minivmac/Portfile

Modified: users/ryandesign/minivmac/Portfile
===================================================================
--- users/ryandesign/minivmac/Portfile	2009-09-15 03:53:59 UTC (rev 57690)
+++ users/ryandesign/minivmac/Portfile	2009-09-15 04:09:50 UTC (rev 57691)
@@ -115,11 +115,11 @@
 }
 
 post-extract {
-    system "tar -x -z -C ${workpath} -f ${distpath}/${my_bootstrap_distfile}"
+    my_system "tar -x -z -C ${workpath} -f ${distpath}/${my_bootstrap_distfile}"
     
     xinstall -W ${filespath} attach.exp configure.applescript demacbinary.sh ${workpath}
     
-    system "${workpath}/demacbinary.sh ${distpath}/${my_system_disk_container_distfile} ${workpath}"
+    my_system "${workpath}/demacbinary.sh ${distpath}/${my_system_disk_container_distfile} ${workpath}"
     
     file mkdir ${my_mnvm_dat}
     ln -s ${my_appdir}/${romfile} ${my_mnvm_dat}
@@ -145,10 +145,10 @@
     # Copy our options to the clipboard.
     set my_variation [my_get_variation]
     set my_options "${my_base_options} -t ${my_target} -m ${my_machine} -n ${my_variation}"
-    system "echo '${my_options}' | pbcopy"
+    my_system "echo '${my_options}' | pbcopy"
     
     # Launch Mini vMac.
-    system "open '${workpath}/${my_bootstrap}'"
+    my_system "open '${workpath}/${my_bootstrap}'"
 }
 
 configure.dir ${workpath}
@@ -221,12 +221,12 @@
     set mountpoint [exec mktemp -d -q -t ${name}]
     # Use this expect script instead of using hdiutil directly, because the
     # system disk image has a license agreement we must agree to.
-    system "${workpath}/attach.exp '${disk_image}' '${mountpoint}' '${allow_writing}'"
+    my_system "${workpath}/attach.exp '${disk_image}' '${mountpoint}' '${allow_writing}'"
     return ${mountpoint}
 }
 
 proc my_detach_disk_image {mountpoint} {
-    system "hdiutil detach ${mountpoint} -force"
+    my_system "hdiutil detach ${mountpoint} -force"
     file delete -force ${mountpoint}
 }
 
@@ -235,6 +235,11 @@
     return ${name}-${version}_${revision}-${my_variation_machine}-${my_target}
 }
 
+proc my_system {cmd} {
+     ui_debug ${cmd}
+     system ${cmd}
+}
+
 livecheck.type          regex
 livecheck.url           ${homepage}download.html
 livecheck.regex         ${name}-(\[0-9.\]+)\\.src
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20090914/572d59f5/attachment.html>