readability

1 files changed, 5 insertions, 9 deletions

diff --git a/perl5/Local/MrRepo/Repo.pm b/perl5/Local/MrRepo/Repo.pm
index 9c32ca61..8d62762c 100644
--- a/perl5/Local/MrRepo/Repo.pm
+++ b/perl5/Local/MrRepo/Repo.pm
@@ -1,6 +1,6 @@
 package Local::MrRepo::Repo;
 
-# Copyright (C) 2019 Sean Whitton
+# Copyright (C) 2019-2020 Sean Whitton
 #
 # This program is free software: you can redistribute it and/or modify
 # it under the terms of the GNU General Public License as published by
@@ -33,19 +33,15 @@ our @EXPORT_OK = ();
 sub new {
     my ($class, $toplevel) = @_;
 
-    bless {toplevel => rel2abs($toplevel), updated => 0}, $class;
+    bless {toplevel => rel2abs($toplevel), updated => 0} => $class;
 }
 
 # attributes
-sub toplevel { return shift->{toplevel} }
-sub updated  { return shift->{updated}  }
+sub toplevel { shift->{toplevel} }
+sub updated  { shift->{updated}  }
 
 # public methods
-sub auto_commit {
-    my $self = shift;
-
-    return $self->_mr_cmd("-m", "autoci");
-}
+sub auto_commit { shift->_mr_cmd("-m", "autoci") }
 sub update {
     my $self = shift;