$NetBSD$

--- scheme/install-lib.scm.orig	2004-11-13 21:14:57.000000000 +0100
+++ scheme/install-lib.scm
@@ -399,23 +399,27 @@
 
 (define (fhs-layout pkg)
   (let* ((scsh-version-dir (string-append "scsh-" scsh-version-string))
-         (base (paths->file-name "share"
-                                 scsh-version-dir
+         (base (paths->file-name "lib"
+                                 "scsh"
                                  "modules"
                                  (package-full-name pkg))))
     `((base        . ,base)
-      (misc-shared . ,base)
+      (misc-shared . ,(paths->file-name "share"
+                                        "scsh"
+                                        "modules"
+                                        (package-full-name pkg)))
       (scheme      . ,(absolute-file-name "scheme" base))
       (lib         . ,(paths->file-name "lib"
-                                        scsh-version-dir
+                                        "scsh"
                                         "modules"
                                         (package-full-name pkg)))
       (doc         . ,(paths->file-name "share"
                                         "doc"
-                                        scsh-version-dir
+                                        "scsh"
+					"modules"
                                         (package-full-name pkg)))
-      (active      . ,(paths->file-name "share"
-                                        scsh-version-dir
+      (active      . ,(paths->file-name "lib"
+                                        "scsh"
                                         "modules")))))
 
 (define (fhs-program-layout pkg)
