From 85d7b983dc65a9a4328ee0136222f085a999cdc9 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 18 Oct 2012 15:25:21 +0000 Subject: (commit) simplify getting/deleting hash value --- common/Varspaceval.pm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'common') diff --git a/common/Varspaceval.pm b/common/Varspaceval.pm index 2ce97f4c..3295426c 100644 --- a/common/Varspaceval.pm +++ b/common/Varspaceval.pm @@ -55,8 +55,7 @@ sub commit { } next if !exists $hash->{$key}; #Elt has been removed no warnings; - $val = $hash->{$key}; - delete $hash->{$key}; + $val = delete $hash->{$key}; my $out_val = $pre . $key . $eq . $val . $rest; $output .= defined $val ? $out_val . "\n" : $out_val; } -- cgit v1.2.1