[36760] users/ryandesign/minivmac/Portfile

[ryandesign at macports.org]

Revision: 36760
          http://trac.macosforge.org/projects/macports/changeset/36760
Author:   ryandesign at macports.org
Date:     2008-05-14 01:41:47 -0700 (Wed, 14 May 2008)

Log Message:
-----------
minivmac: launch autoquit when the emulator starts

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

Modified: users/ryandesign/minivmac/Portfile
===================================================================
--- users/ryandesign/minivmac/Portfile	2008-05-14 08:29:40 UTC (rev 36759)
+++ users/ryandesign/minivmac/Portfile	2008-05-14 08:41:47 UTC (rev 36760)
@@ -118,6 +118,8 @@
 	file mkdir "${my_startup_disk_autoquit_dir}"
 	# Need to copy this with the resource fork.
 	system "ditto --rsrc ${my_autoquit_disk_mount}/AutQuit7 ${my_startup_disk_autoquit_dir}"
+	# Launch autoquit at startup.
+	make_alias "${my_startup_disk_autoquit_dir}/AutQuit7" "${my_startup_disk_mount}/System Folder/Startup Items"
 	
 	# Unmount disk images.
 	detach_disk_image ${my_startup_disk_mount}
@@ -184,6 +186,10 @@
 	file delete -force ${mountpoint}
 }
 
+proc make_alias {src dst} {
+	system "osascript -e 'set my_src to POSIX file \"${src}\"' -e 'set my_dst to POSIX file \"${dst}\"' -e 'tell app \"Finder\" to make new alias file at my_dst to my_src'"
+}
+
 livecheck.check     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/20080514/510ddb0d/attachment.html