Changeset 1058
- Timestamp:
- 07/20/12 17:10:34 (12 years ago)
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/3.0/LATMOS-Accounts/lib/LATMOS/Accounts.pm
r1022 r1058 281 281 } 282 282 283 sub _sync_from_name { 284 my ($self, $syncname) = @_; 285 return if (!$syncname); 286 $self->val("sync:$syncname", 'from', $self->default_base_name); 287 } 288 283 289 =head2 sync_access($name, %options) 284 290 … … 293 299 if ($name) { 294 300 @obases = 295 (map { $self->base($_) } ($self-> sync_from_name($name), $self->val("sync:$name", 'to')));301 (map { $self->base($_) } ($self->_sync_from_name($name), $self->val("sync:$name", 'to'))); 296 302 } elsif(@{ $options{bases} || []}) { 297 303 @obases = map { $self->base($_) } @{ $options{bases} || []}; 298 304 } elsif (my $sname = $self->default_synchro_name) { 299 305 @obases = (map { $self->base($_) } 300 ($self-> sync_from_name($sname), $self->val("sync:$sname", 'to'))306 ($self->_sync_from_name($sname), $self->val("sync:$sname", 'to')) 301 307 ); 302 308 } -
trunk/LATMOS-Accounts/lib/LATMOS/Accounts.pm
r1047 r1058 234 234 } 235 235 236 sub _sync_from_name { 237 my ($self, $syncname) = @_; 238 return if (!$syncname); 239 $self->val("sync:$syncname", 'from', $self->default_base_name); 240 } 241 236 242 =head2 sync_access($name, %options) 237 243 … … 246 252 if ($name) { 247 253 @obases = 248 (map { $self->base($_) } ($self-> sync_from_name($name), $self->val("sync:$name", 'to')));254 (map { $self->base($_) } ($self->_sync_from_name($name), $self->val("sync:$name", 'to'))); 249 255 } elsif(@{ $options{bases} || []}) { 250 256 @obases = map { $self->base($_) } @{ $options{bases} || []}; 251 257 } elsif (my $sname = $self->default_synchro_name) { 252 258 @obases = (map { $self->base($_) } 253 ($self-> sync_from_name($sname), $self->val("sync:$sname", 'to'))259 ($self->_sync_from_name($sname), $self->val("sync:$sname", 'to')) 254 260 ); 255 261 }
Note: See TracChangeset
for help on using the changeset viewer.