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

File patch-base-2.2b1-ipr-ipr_file.icl.diff, 718 bytes (added by Jacobus.Geluk@…, 17 years ago)
  • ../base-2.2b1/ipr/ipr_file.icl

    old new  
    210210    if (ipr_file_exists (filename))
    211211        icl_shortstr_cpy (fullname, filename);
    212212    else {
     213        icl_shortstr_cat (workname, "/opt/local/etc/") ;
     214        icl_shortstr_cat (workname, filename) ;
     215        if (ipr_file_exists (workname)) {
     216                icl_shortstr_cpy (fullname, workname) ;
     217                rc = 0 ;
     218        } else {
    213219        rc = -1;                        //  Assume we don't find the file
    214220        while (pathptr && *pathptr) {
    215221            length = strcspn (pathptr, PATHSEP);
     
    230236                break;
    231237            }
    232238        }
     239        }
    233240    }
    234241</method>
    235242