Changed to new package system.

scsh/file-mode/AUTHORS

@@ -1,2 +1,2 @@
-Richard Kelsey (port to sunterlib by Martin Gasbichler)
-
+Copyright (c) 2001 Richard Kelsey
+Copyright (c) 2003 Martin Gasbichler

scsh/file-mode/NEWS

@@ -0,0 +1,9 @@
+version 0.1
+* New package system.
+
+version 0.0 2001-07-15
+* Upstream source is Richard Kelsey's code in Scheme 48 0.57.
+
+
+
+

scsh/file-mode/load.scm

@@ -4,3 +4,11 @@
 	  file-mode+ file-mode-
 	  file-mode=? file-mode<=? file-mode>=?
 	  file-mode->integer integer->file-mode))
+
+(define-structure file-modes file-modes-interface
+  (open scheme
+	define-record-types
+	signals
+	bitwise)
+  (for-syntax (open scheme bitwise))
+  (files file-mode))

scsh/file-mode/packages.scm

@@ -1,7 +0,0 @@
-(define-structure file-modes file-modes-interface
-  (open scheme
-	define-record-types
-	signals
-	bitwise)
-  (for-syntax (open scheme bitwise))
-  (files file-mode))

scsh/file-mode/pkg-def.scm

@@ -0,0 +1,8 @@
+(define-package "file-mode"
+  (0 1)
+  ()
+  (install-file "load.scm" 'base)
+  (install-file "README" 'doc)
+  (install-file "NEWS" 'doc)
+  (install-string (COPYING) "COPYING" 'doc)
+  (install-file "file-mode.scm" 'scheme))