Hi there,
Eliot, I remember I read in one of my threads - in which I posted a small mod to show a sites language by placing the countries flag next to the link - that you said the codes I gave had been stolen from some other threads.
Just in short: that's wrong!
I know there's already another mod by which one can choose a certain flag. But this mod used a drop-down-menue, whereas I used checkboxes. That's a difference and I wasn't able to find such a mod done by someone else before!
Anyhow, no I can't even find my thread anymore (has it been deleted??), but there is a bug in my mod (one more hint I didn't steal codes
) which I'd like to ask a thing about here:
When I add checkboxes with the same name-value, each of the values is "separated" by a ~~. For example I got D~~A~~E and in admin.cgi it even showed D|A|E - and that's more than ugly!
What I finally did is put these codes in my add.cgi:
if ($in{'Sprache'}) {
@sprache = split /\~\~/,$in{'Sprache'};
$in{'Sprache'} = join ("",@sprache);
}- and it works! Really surprises me
!
But since this ~~-thing messed up my links.db already once I fear that also with the fixing above my files still might be corrupted once...
So I'd like to ask someone with more PERL-experiences to give me a "confirmation" for above solution. Would help me being able to sleep again...
Denis
[This message has been edited by Denis (edited April 04, 2000).]
Eliot, I remember I read in one of my threads - in which I posted a small mod to show a sites language by placing the countries flag next to the link - that you said the codes I gave had been stolen from some other threads.
Just in short: that's wrong!

Anyhow, no I can't even find my thread anymore (has it been deleted??), but there is a bug in my mod (one more hint I didn't steal codes

When I add checkboxes with the same name-value, each of the values is "separated" by a ~~. For example I got D~~A~~E and in admin.cgi it even showed D|A|E - and that's more than ugly!
What I finally did is put these codes in my add.cgi:
Code:
# Die Delimeter in $in{'Sprache'} müssen herausgefilter werden... MOD by DC. if ($in{'Sprache'}) {
@sprache = split /\~\~/,$in{'Sprache'};
$in{'Sprache'} = join ("",@sprache);
}

But since this ~~-thing messed up my links.db already once I fear that also with the fixing above my files still might be corrupted once...
So I'd like to ask someone with more PERL-experiences to give me a "confirmation" for above solution. Would help me being able to sleep again...

Denis
[This message has been edited by Denis (edited April 04, 2000).]