Removed dependency on package being named "python".

info.rkt

@@ -1,3 +1,3 @@
 #lang info
 (define collection "python")
-(define compile-omit-paths (list "examples"))
+(define compile-omit-paths (list "examples" "test"))

libpython.rkt

@@ -3,6 +3,7 @@
   (require ffi/unsafe
            ffi/unsafe/define
            ffi/unsafe/alloc
+           "paths.rkt"
            (for-syntax racket/syntax))
 
   (provide (except-out (all-defined-out)
@@ -26,10 +27,8 @@
   (define path-to-others-lib
     (and path-to-cpython-lib
          (let ([file-suffix (number->string (system-type 'word))]
-               [file-ext (case (system-type 'os)
-                            [(windows) ".dll"]
-                            [(unix macosx) ".so"])])
-           (collection-file-path (build-path "c" (string-append "others" file-suffix file-ext)) "python"))))
+               [file-ext (bytes->string/locale (system-type 'so-suffix))])
+           (simplify-path (build-path python-root "c" (string-append "others" file-suffix file-ext))))))
 
   (define-ffi-definer define-function (ffi-lib path-to-cpython-lib)
     #:default-make-fail void-if-not-available)

paths.rkt

@@ -0,0 +1,9 @@
+#lang racket
+(provide (except-out (all-defined-out) paths.rkt))
+
+(require racket/runtime-path)
+(define-runtime-path paths.rkt "paths.rkt")
+(define python-root (simplify-path (build-path paths.rkt 'up)))
+
+(define path-to-lib (simplify-path (build-path python-root "lib")))
+(define path-to-PATH (simplify-path (build-path path-to-lib "PATH")))

runtime.rkt

@@ -603,12 +603,13 @@
   (provide (all-from-out "name-mangling.rkt"))
 
 
+  (require "paths.rkt")
+  (require (for-syntax "paths.rkt"))
 
   (define PATH
-    (let* ([path-to-PATH (collection-file-path (build-path "lib" "PATH") "python")]
-           [file (open-input-file path-to-PATH)])
+    (let* ([file (open-input-file path-to-PATH)])
       (list->py-list
-       (append (list "." (path->string (collection-file-path (build-path "lib") "python")))
+       (append (list "." path-to-lib)
                (map string-trim
                     (port->list read-line file))))))
 
@@ -628,9 +629,8 @@
   (require (for-syntax racket/port
                        racket/string))
   (define-for-syntax (module-name->module-path/compile-time name)
-    (let* ([path-to-PATH (collection-file-path (build-path "lib" "PATH") "python")]
-           [file (open-input-file path-to-PATH)])
-      (let loop ([dirs (append (list "." (path->string (collection-file-path (build-path "lib") "python")))
+    (let* ([file (open-input-file path-to-PATH)])
+      (let loop ([dirs (append (list "." path-to-lib)
                                (map string-trim (port->list read-line file)))])
         (if (empty? dirs)
           (raise-syntax-error 'ImportError (format "No module named ~a" name))