summaryrefslogtreecommitdiff
path: root/dev-scheme/slib/files/slib-3.2.5-fix-paths.patch
diff options
context:
space:
mode:
Diffstat (limited to 'dev-scheme/slib/files/slib-3.2.5-fix-paths.patch')
-rw-r--r--dev-scheme/slib/files/slib-3.2.5-fix-paths.patch42
1 files changed, 0 insertions, 42 deletions
diff --git a/dev-scheme/slib/files/slib-3.2.5-fix-paths.patch b/dev-scheme/slib/files/slib-3.2.5-fix-paths.patch
deleted file mode 100644
index 9a373c14d733..000000000000
--- a/dev-scheme/slib/files/slib-3.2.5-fix-paths.patch
+++ /dev/null
@@ -1,42 +0,0 @@
---- slib-3b5/~RScheme.init 2016-10-10 23:05:39.117046443 +0200
-+++ slib-3b5/RScheme.init 2016-10-10 23:06:47.242857550 +0200
-@@ -52,7 +52,7 @@
- ;; Use this path if your scheme does not support GETENV
- ;; or if SCHEME_LIBRARY_PATH is not set.
- (case (software-type)
-- ((unix) "/usr/lib/slib/")
-+ ((unix) "/usr/share/slib/")
- ((vms) "lib$scheme:")
- ((ms-dos) "C:\\SLIB\\")
- (else "")))))
---- slib-3b5/~gambit.init 2016-10-10 23:05:20.939634454 +0200
-+++ slib-3b5/gambit.init 2016-10-10 23:07:46.571968697 +0200
-@@ -38,7 +38,7 @@
- (let ((impl-path
- (or (getenv "GAMBIT_IMPLEMENTATION_PATH")
- (case (software-type)
-- ((unix) "/usr/local/share/gambc/")
-+ ((unix) "/usr/share/gambc/")
- ((vms) "scheme$src:")
- ((ms-dos) "C:\\scheme\\")
- ((windows) "c:/scheme/")
-@@ -65,7 +65,7 @@
- ;; Use this path if your scheme does not support GETENV
- ;; or if SCHEME_LIBRARY_PATH is not set.
- (case (software-type)
-- ((unix) "/usr/local/lib/slib/")
-+ ((unix) "/usr/share/slib/")
- ((macos) (string-append (implementation-vicinity) "slib:"))
- ((amiga) "dh0:scm/Library/")
- ((vms) "lib$scheme:")
---- slib-3b5/~guile-2.init 2016-10-10 23:05:46.531807087 +0200
-+++ slib-3b5/guile-2.init 2016-10-10 23:08:00.154538349 +0200
-@@ -199,7 +199,7 @@
- (define implementation-vicinity
- (cond ((getenv "GUILE_IMPLEMENTATION_PATH")
- => (lambda (path) (lambda () path)))
-- (else %site-dir)))
-+ (else %library-dir)))
-
- ;;; (library-vicinity) should be defined to be the pathname of the
- ;;; directory where files of Scheme library functions reside.