// Needed these IMO, used quite a bit // Radix - July 1996 string real_filename(object obj) { string s; int i; if(sscanf(file_name(obj),"%s#%d",s,i) == 2) return s; return file_name(obj); } string domain_origin(object obj) { string fname = file_name(obj); string dom = explode(fname,"/")[1]; if(member_array(dom,get_dir("/d/")) != -1) return dom; return 0; }