- # write database of installed versions
- open SRC, '>.modulemanager' or die "can't write installed versions to .modulemanager, won't be able to track upgrades properly: $!";
- foreach my $key (keys %mod_versions)
- {
- print SRC "$key $mod_versions{$key}\n";
- }
- close SRC;
+# write database of installed versions
+open SRC, '>.modulemanager' or die "can't write installed versions to .modulemanager, won't be able to track upgrades properly: $!";
+foreach my $key (keys %mod_versions)
+{
+ print SRC "$key $mod_versions{$key}\n";