$NetBSD: patch-aa,v 1.3 2005/10/26 09:19:19 adam Exp $

--- guile.init.orig	2005-10-26 11:05:58.000000000 +0000
+++ guile.init
@@ -124,7 +124,8 @@
 		   ((NOSVE) ".")
 		   ((MACOS THINKC) ":")
 		   ((MS-DOS WINDOWS ATARIST OS/2) "\\")
-		   ((UNIX COHERENT PLAN9 AMIGA) "/"))))
+		   ((UNIX COHERENT PLAN9 AMIGA) "/")
+		   (else "/"))))
 	    (lambda (vic name)
 	      (string-append vic name *vicinity-suffix*))))))
 ;@
