[ic] Simple Options, expired page

Mike Heins mike at perusion.com
Sun Apr 18 15:11:51 UTC 2010


Quoting Peter (peter at pajamian.dhs.org):
> On 18/04/10 17:37, Mike Heins wrote:
> > Quoting Peter (peter at pajamian.dhs.org):
> >> On 18/04/10 16:32, Mike Heins wrote:
> >>> That shouldn't be necessary, because the Scratch overrides the saved
> >>> one. I think that's why we did this in the first place -- to prevent problems
> >>> with option checks on links from search engines.
> >> But it doesn't, from the source (and also as pointed out by Steve in a
> >> previous email):
> >> <http://git.icdevgroup.org/?p=interchange.git;a=blob;f=lib/Vend/Order.pm;h=7a99f7827ac2f4e05cd1556c9154f7eb3a12cd5c;hb=HEAD#l964>
> >>
> >> The saved profile is checked before the scratch.
> > 
> > Hmm. Did this change sometime since I wrote it over 14 years
> > ago? 8-)
> 
> peter at peter-desktop:~/interchange/lib/Vend$ git blame Order.pm
> 
> ...
> 
> ^5550c3a (Mike Heins        2000-05-26 18:50:47 +0000  968)
> if(defined $Vend::Cfg->{OrderProfileName}->{$profile}) {
> ^5550c3a (Mike Heins        2000-05-26 18:50:47 +0000  969)
> $profile = $Vend::Cfg->{OrderProfileName}->{$profile};
> ^5550c3a (Mike Heins        2000-05-26 18:50:47 +0000  970)
> $params = $Vend::Cfg->{OrderProfile}->[$profile];
> ^5550c3a (Mike Heins        2000-05-26 18:50:47 +0000  971)     }
> ^5550c3a (Mike Heins        2000-05-26 18:50:47 +0000  972)
> elsif($profile =~ /^\d+$/) {
> ^5550c3a (Mike Heins        2000-05-26 18:50:47 +0000  973)
> $params = $Vend::Cfg->{OrderProfile}->[$profile];
> ^5550c3a (Mike Heins        2000-05-26 18:50:47 +0000  974)     }
> 955ee29d (Mike Heins        2000-07-20 07:15:47 +0000  975)
> elsif(defined $::Scratch->{$profile}) {
> 955ee29d (Mike Heins        2000-07-20 07:15:47 +0000  976)
> $params = $::Scratch->{$profile};
> ^5550c3a (Mike Heins        2000-05-26 18:50:47 +0000  977)     }
> e3465d6a (Mike Heins        2001-11-08 18:27:35 +0000  978)     else {
> e3465d6a (Mike Heins        2001-11-08 18:27:35 +0000  979)
> ::logError("Order profile %s not found", $profile);
> e3465d6a (Mike Heins        2001-11-08 18:27:35 +0000  980)
> return undef;
> e3465d6a (Mike Heins        2001-11-08 18:27:35 +0000  981)     }
> 
> 
> :-P
> 

That's kind of cool. Obviously git imports CVS history....too
bad it can't reach into the bytes and figure out what happened
prior to 2000 when I first put it in CVS. 8-)

-- 
Mike Heins
Perusion -- Expert Interchange Consulting    http://www.perusion.com/
phone +1.765.328.4479  <mike at perusion.com>

An amateur practices until he gets it right. A pro
practices until he can't get it wrong. -- unknown



More information about the interchange-users mailing list