Hi there.
Try this....
1) Find the following codes in the
sub query routine in
db.cgi:
Code:
($in{$db_cols[$field]} eq "*") and ($tmpreg = ".*"); # A "*" matches anything.
which is located in the following area of that routine:
Code:
# Now let's build up all the regexpressions we will use. This saves the program
# from having to recompile the same regular expression every time.
foreach $field (@search_fields) {
my $tmpreg = "$in{$db_cols[$field]}";
(!$in{'re'}) and ($tmpreg = "\Q$tmpreg\E");
($in{'ww'}) and ($tmpreg = "\\b$tmpreg\\b");
(!$in{'cs'}) and ($tmpreg = "(?i)$tmpreg");
($in{$db_cols[$field]} eq "*") and ($tmpreg = ".*"); # A "*" matches anything. $regexp_func[$field] = eval "sub { m/$tmpreg/o }";
$regexp_bold[$field] = $tmpreg;
}
2) Change that line to the following:
Code:
if ($per_admin) {
($in{$db_cols[$field]} eq "*") and ($tmpreg = ".*"); # A "*" matches anything.
}
else {
}
See if this works. Remember to back up your files when you add new codes.
Regards,
------------------
Eliot Lee
Founder and Editor
Anthro TECH, L.L.C
http://www.anthrotech.com/
info@anthrotech.com
==========================
Coconino Community College
http://www.coco.cc.az.us/
Web Technology
Coordinator
elee@coco.cc.az.us