# # # patch "Monotone/AutomateStdio.pm" # from [49db9e335e4f284011126885c7d62dc1272dd332] # to [8edb42907ace0785da69df5a4d5ddc47bd776aac] # # patch "TODO" # from [599a84016a9e4b548be8a1a599e96db931e2addc] # to [cb53adbd158f585f3789f705019fa01034e32427] # ============================================================ --- Monotone/AutomateStdio.pm 49db9e335e4f284011126885c7d62dc1272dd332 +++ Monotone/AutomateStdio.pm 8edb42907ace0785da69df5a4d5ddc47bd776aac @@ -196,6 +196,7 @@ sub new($;$) $this->{mtn_err_msg} = ""; bless($this); + $this->SUPER::new() if $this->can("SUPER::new"); return $this; @@ -219,10 +220,7 @@ sub DESTROY my Monotone::AutomateStdio $this = shift(); closedown($this); - if ($this->can("SUPER::DESTROY")) - { - $this->SUPER::DESTROY(); - } + $this->SUPER::DESTROY() if $this->can("SUPER::DESTROY"); } # ============================================================ --- TODO 599a84016a9e4b548be8a1a599e96db931e2addc +++ TODO cb53adbd158f585f3789f705019fa01034e32427 @@ -1,5 +1,4 @@ 1) Update to version from 0.35 to 0.37. 1) Update to version from 0.35 to 0.37. -2) Implement conditional chained constructor. 2) Sort out a test database for use with a mtn-tester (use a script to generate the database rather than use a static db). 3) Do CPAN stuff.