Changed to new package system.

scsh/afs/AUTHORS

@@ -1 +1 @@
-Martin Gasbichler
+Copyright (c) 2003 Martin Gasbichler

scsh/afs/NEWS

@@ -0,0 +1,2 @@
+version 0.0
+* New package system.

scsh/afs/load.scm

@@ -9,3 +9,11 @@
    set-acl!
    add-acl!
    set-fs-command!))
+
+(define-structure afs-fs afs-fs-interface
+  (open scheme-with-scsh
+	enum-sets
+	finite-types
+	srfi-1
+	srfi-13)
+  (files afs-fs))

scsh/afs/packages.scm

@@ -1,7 +0,0 @@
-(define-structure afs-fs afs-fs-interface
-  (open scheme-with-scsh
-	enum-sets 
-	finite-types 
-	srfi-1
-	srfi-13)
-  (files afs-fs))

scsh/afs/pkg-def.scm

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

scsh/base64/AUTHORS

@@ -1 +1 @@
-Michel Schinz
+Copyright (c) 2003 Michel Schinz

scsh/base64/NEWS

@@ -0,0 +1,2 @@
+version 0.0
+* New package system.

scsh/base64/load.scm

@@ -4,3 +4,10 @@
           base64-encode-string
           base64-decode-string
           base64-decode-port))
+
+(define-structure base64 base64-interface
+  (open scheme-with-scsh
+        let-opt
+        byte-vectors
+        bytio)
+  (files base64))

scsh/base64/packages.scm

@@ -1,6 +0,0 @@
-(define-structure base64 base64-interface
-  (open scheme-with-scsh
-        let-opt
-        byte-vectors
-        bytio)
-  (files base64))

scsh/base64/pkg-def.scm

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

scsh/bytio/AUTHORS

@@ -1 +1 @@
-Rolf-Thomas Happe
+Copyright (c) 2003 Rolf-Thomas Happe

scsh/bytio/NEWS

@@ -0,0 +1,2 @@
+version 0.0
+* New package system.

scsh/bytio/interfaces.scm

@@ -1,28 +0,0 @@
-; Copyright (c) 2003 RT Happe <rthappe at web de>
-; See the file COPYING distributed with the Scheme Untergrund Library
-
-(define-interface bytio-face
-  (export read-byte
-	  peek-byte
-	  write-byte
-
-          read-bytes!/partial
-          read-bytes/partial
-          read-bytes!
-          read-bytes
-          write-bytes/partial
-          write-bytes
-          ))
-
-
-
-
-
-
-
-
-
-
-
-
-

scsh/bytio/load.scm

@@ -1,11 +1,24 @@
 ; Copyright (c) 2003 RT Happe <rthappe at web de>
 ; See the file COPYING distributed with the Scheme Untergrund Library
 
+(define-interface bytio-face
+  (export read-byte
+	  peek-byte
+	  write-byte
+
+          read-bytes!/partial
+          read-bytes/partial
+          read-bytes!
+          read-bytes
+          write-bytes/partial
+          write-bytes
+          ))
+
 ;; byte (rather than character) i/o
 (define-structure bytio bytio-face
   (open krims                           ; assert
         sequence-lib                    ; subsequence sequence-length
-	byte-vectors 
+	byte-vectors
 	let-opt				; let-optionals
         srfi-23                         ; error
         scsh                            ; fdes & port stuff, bitwise-and
@@ -16,4 +29,3 @@
 	primitives			; copy-bytes!
 	)
   (files rw-bytes))
-

scsh/bytio/pkg-def.scm

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