Ticket #14658: patch-base-2.2b1-ipr-ipr_file.icl.diff

../base-2.2b1/ipr/ipr_file.icl

@@ -210 +210 @@
     if (ipr_file_exists (filename))
         icl_shortstr_cpy (fullname, filename);
     else {
+        icl_shortstr_cat (workname, "/opt/local/etc/") ;
+        icl_shortstr_cat (workname, filename) ;
+        if (ipr_file_exists (workname)) {
+                icl_shortstr_cpy (fullname, workname) ;
+                rc = 0 ;
+        } else {
         rc = -1;                        //  Assume we don't find the file
         while (pathptr && *pathptr) {
             length = strcspn (pathptr, PATHSEP);
@@ -230 +236 @@
                 break;
             }
         }
+        }
     }
 </method>