force new_pdl_from_string to return a piddle with P=physical flag

PDLPorters · Oct 12, 2015 · 3de90f5 · 3de90f5
1 parent c2ae69d
commit 3de90f5
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Basic/Core/Core.pm b/Basic/Core/Core.pm
@@ -1121,7 +1121,7 @@ sub PDL::Core::new_pdl_from_string {
       if( $to_return->dim(-1) == 1 ) {
 	      if( $to_return->dims > 1 ) {
 		      # remove potentially spurious last dimension
-		      $to_return = $to_return->mv(-1,1)->clump(2);
+		      $to_return = $to_return->mv(-1,1)->clump(2)->sever;
 	      } elsif( $to_return->dims == 1 ) {
 		      # fix scalar values
 		      $to_return->setdims([]);