diff -Naur mosref-2.0-beta3.orig/bin/install.ms mosref-2.0-beta3/bin/install.ms
--- mosref-2.0-beta3.orig/bin/install.ms	2006-07-29 21:02:07.000000000 +0000
+++ mosref-2.0-beta3/bin/install.ms	2008-01-10 00:31:08.000000000 +0000
@@ -2,10 +2,10 @@
 (import "lib/build")
 
 (define (main . args)
-  (define base-dir #f)
-  (define mod-dir #f)
-  (define stub-dir #f)
-  (define bin-dir #f)
+  (define base-dir "%%DESTDIR%%")
+  (define mod-dir (string-append base-dir "/lib/mosvm"))
+  (define stub-dir (string-append mod-dir "-stubs"))
+  (define bin-dir (string-append base-dir "/bin"))
   (define good #f)
   
   (define (do-config-prompt title current guess-fn description)
@@ -82,13 +82,13 @@
         ("   Stub Directory" stub-dir)
         (" Binary Directory" bin-dir))))
   
-  (configure)
+  ;(configure)
   
   (write-data-file "site/config.ms"
      (string-append ";;; Generated by bin/install.ms" *line-sep*
-                    "(set-site-config! 'bin-path \"" bin-dir "\")" *line-sep*
-                    "(set-site-config! 'mod-path '(\".\" \"" mod-dir "\"))" *line-sep*
-                    "(set-site-config! 'stub-path \"" stub-dir "\")" *line-sep*))
+                    "(set-site-config! 'bin-path \"/usr/bin\")" *line-sep*
+                    "(set-site-config! 'mod-path '(\".\" \"/usr/lib/mosvm\"))" *line-sep*
+                    "(set-site-config! 'stub-path \"/usr/lib/mosvm-stubs\")" *line-sep*))
   
   (mosc "site/config.ms")
   
