From 3c261c5d052d58a8fd7368d03370d73baa9fc417 Mon Sep 17 00:00:00 2001
From: Matthew Flatt <mflatt@racket-lang.org>
Date: Wed, 7 Jun 2006 14:25:14 +0000
Subject: [PATCH] Mac OS X mred launcher script should be relative to
 executable

svn: r3260
---
 collects/mred/script-installer.ss | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/collects/mred/script-installer.ss b/collects/mred/script-installer.ss
index 0000b3489f..73ba958d46 100644
--- a/collects/mred/script-installer.ss
+++ b/collects/mred/script-installer.ss
@@ -12,7 +12,8 @@
 		 (parameterize ([current-launcher-variant variant])
 		   (make-mred-launcher null 
 				       (mred-program-launcher-path "MrEd")
-				       '((exe-name . "MrEd")))))])
+				       '((exe-name . "MrEd")
+					 (relative? . #t)))))])
 	  (install 'script)
 	  (when (memq 'script-3m (available-mred-variants))
 	    (install 'script-3m)))))))