Changeset 7462 for src/Pugs.hs

Timestamp:

10/09/05 13:39:11 (3 years ago)

Author:

autrijus

Message:

* adjust the helper launchers to find auto/pugs/ in either

privlib or sitelib, now pugslibdir is gone.

Files:

• src/Pugs.hs (modified) (1 diff)

src/Pugs.hs

@@ -246 +246 @@
 doExecuteHelper :: FilePath -> [String] -> IO ()
 doExecuteHelper helper args = do
-    let searchPaths = concatMap (\x -> map (x++) suffixes) [["."], ["..", ".."], [getConfig "sourcedir"], [getConfig "pugslibdir"]]
+    let searchPaths = concatMap (\x -> map (x++) suffixes) [["."], ["..", ".."], [getConfig "sourcedir"], [getConfig "perl5privlib", "auto", "pugs"], [getConfig "perl5sitelib", "auto", "pugs"]]
     mbin <- findHelper searchPaths
     case mbin of