diff options
Diffstat (limited to 'libpiny')
| -rw-r--r-- | libpiny/debian/changelog | 6 | ||||
| -rw-r--r-- | libpiny/lib/Piny/Repo.pm | 4 |
2 files changed, 6 insertions, 4 deletions
diff --git a/libpiny/debian/changelog b/libpiny/debian/changelog index 1fe34bb..8bd42ee 100644 --- a/libpiny/debian/changelog +++ b/libpiny/debian/changelog @@ -1,3 +1,9 @@ +libpiny-perl (0.16) unstable; urgency=low + + * Fix some of the mutators in Piny::Repo. + + -- Julian Blake Kongslie <jblake@omgwallhack.org> Sun, 09 Jan 2011 16:16:04 -0800 + libpiny-perl (0.15) unstable; urgency=low * Increment standards version. diff --git a/libpiny/lib/Piny/Repo.pm b/libpiny/lib/Piny/Repo.pm index 8ebb0f4..1acc526 100644 --- a/libpiny/lib/Piny/Repo.pm +++ b/libpiny/lib/Piny/Repo.pm @@ -326,8 +326,6 @@ sub _rename_repo { sub _set_description { my ( $s, $new_description, $old_description ) = @_; - return unless defined $old_description; - open( my $fd, ">", $s->path . "/description" ) or die "Unable to open " . $s->path . "/description for writing: $!"; print $fd $new_description; close( $fd ) or die "Error when closing " . $s->path . "/description: $!"; @@ -336,8 +334,6 @@ sub _set_description { sub _change_owner { my ( $s, $new_owner, $old_owner ) = @_; - return unless defined $old_owner; - find( { wanted => sub { chown( $new_owner->uid, -1, $_ ) or die "Couldn't chown $_: $!"; }, no_chdir => 1 }, $s->path . "/objects" ); $s->clear_ikiwiki_setup; |