Diff of /bin/ptomorph [6051b1] .. [a452dd]  Maximize  Restore

Switch to side-by-side view

--- a/bin/ptomorph
+++ b/bin/ptomorph
@@ -77,6 +77,8 @@
     $pto->Image->[$id_image]->{n} = '"'. $path_new . '"';
 }
 
+@{$pto->Control} = () if defined $p_order;
+
 $pto->Write ($path_out);
 
 __END__