Changeset 243 for trunk/SRC/Utilities/createfunc.pro

Timestamp:

04/12/07 10:52:32 (17 years ago)

Author:

smasson

Message:

small bugfixes

File:

• trunk/SRC/Utilities/createfunc.pro (modified) (1 diff)

trunk/SRC/Utilities/createfunc.pro

@@ -68 +68 @@
    cd, current = here
    pathlist = [here, strsplit(!path, path_sep(/search_path),/extract)]
-   inpath = total((file_search(dirname))[0] EQ pathlist)
-   IF inpath EQ 0 THEN !path = !path + path_sep(/search_path) + inpath
+   inpath = total((file_search(dirname, /fully_qualify_path))[0] EQ pathlist)
+   IF inpath EQ 0 THEN !path = dirname + path_sep(/search_path) + !path
 ; update the list of .pro and .sav in !PATH
    path_cache, /rebuild