Changeset 29185
- Timestamp:
- Sep 21, 2010, 4:36:42 PM (16 years ago)
- File:
-
- 1 edited
-
trunk/ippToPsps/perl/ippToPsps/Datastore.pm (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippToPsps/perl/ippToPsps/Datastore.pm
r28951 r29185 27 27 bless $self, $class; 28 28 return $self; 29 } 30 31 ######################################################################################## 32 # 33 # Returns datastore product 34 # 35 ######################################################################################## 36 sub getProduct { 37 my ($self) = @_; 38 return $self->{_product}; 29 39 } 30 40 … … 58 68 print "* Successfully published $file to datastore\n"; 59 69 60 close($tempFile); 70 close $tempFile; 71 unlink $tempFile; 61 72 62 73 return 1;
Note:
See TracChangeset
for help on using the changeset viewer.
