Revision: 6412 Author: ek.kato Date: Wed Jun 2 04:06:13 2010 Log: * scm/plugin.scm (find-module-lib-path) : Removed. Obsoleted by r6371.
http://code.google.com/p/uim/source/detail?r=6412 Modified: /trunk/scm/plugin.scm ======================================= --- /trunk/scm/plugin.scm Fri May 7 02:17:54 2010 +++ /trunk/scm/plugin.scm Wed Jun 2 04:06:13 2010 @@ -110,19 +110,6 @@ (try-load user-file)) #t))))) -(define find-module-lib-path - (lambda (paths module-name) - (let ((path ())) - (cond ((null? paths) #f) - ((not (string? (car paths))) #f) - ((file-readable? (string-append (car paths) - "/libuim-" - module-name - ".so")) - (string-append (car paths) "/libuim-" module-name ".so")) - (else - (find-module-lib-path (cdr paths) module-name)))))) - (define find-module-scm-path (lambda (paths module-name) (let ((path ()))
