1
0
mirror of https://git.FreeBSD.org/ports.git synced 2024-11-28 01:06:17 +00:00

Fix function info doesn't work.

PR:		ports/44129
Submitted by:	Kimura Fuyuki <fuyuki@hadaly.org>
Approved by:	maintainer
This commit is contained in:
Norikatsu Shigemura 2002-10-27 06:09:05 +00:00
parent 747f91f39f
commit 3d6a4fd46e
Notes: svn2git 2021-03-31 03:12:20 +00:00
svn path=/head/; revision=68911

View File

@ -0,0 +1,14 @@
--- lib/gauche/interactive/info.scm.orig Fri Jul 12 15:57:01 2002
+++ lib/gauche/interactive/info.scm Thu Oct 24 11:28:44 2002
@@ -61,9 +61,9 @@
(else '())))
(instpath
(let1 pathcomps (string-split (gauche-library-directory) #\/)
- (if (> (length pathcomps) 3)
+ (if (> (length pathcomps) 4)
(list (apply build-path
- (append (drop-right pathcomps 3) '("info"))))
+ (append (drop-right pathcomps 4) '("info"))))
'())))
(in-place (list "../doc")))
(append syspath instpath in-place)))