[Scoop-checkins] cvs commit in scoop/lib/Scoop/Admin

[cvs at versionhost.com]

Commit info for scoop/lib/Scoop/Admin:

Modified Files:
	SiteControls.pm 
Log Message:
bug #27. Fix from rusty.
--hulver


Index: SiteControls.pm
===================================================================
RCS file: /cvs/scoop/scoop/lib/Scoop/Admin/SiteControls.pm,v
retrieving revision 1.9
retrieving revision 1.10
diff -r1.9 -r1.10
121a122
> 		warn "Value is $value\n" if $DEBUG;
146c147,148
< 		if( $var->{name} eq $v && (($edit && $edit eq 'Get') || $mode eq 'edit')) {
---
> 		if( $var->{name} eq $v && (($edit && $edit eq 'Get') || $mode eq 'edit') && !$save) {
> 			warn "Getting $var->{name} from DB...\n" if $DEBUG;
196c198,199
< 
---
> 	
> 	warn "Value is $value\n" if $DEBUG;
615,616c618,620
< 		$S->cache->clear({resource => 'vars', element => 'VARS'});
< 		$S->cache->stamp_cache('vars', time());
---
> 		warn "Var changed. Refreshing.\n";
> 		$S->cache->remove('vars');
> 		$S->cache->stamp('vars');