From baebe1fa18aa821503c38916331c514e52e413e6 Mon Sep 17 00:00:00 2001
From: Moritz Lenz <moritz@faui2k3.org>
Date: Tue, 25 May 2010 21:44:12 +0200
Subject: [PATCH] make Hash.delete($one_item) return that item (and not a list
 of items)

Fixes RT #68482. Inspired by patrickas++
Also adds three more test files (of which two are unrelated)
---
 src/core/Hash.pm | 2 +-
 t/spectest.data  | 3 +++
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/core/Hash.pm b/src/core/Hash.pm
index e6b9b1c6d19..815869acb5b 100644
--- a/src/core/Hash.pm
+++ b/src/core/Hash.pm
@@ -67,7 +67,7 @@ role Hash is EnumMap {
                 delete $P1[$P0]
             }
         }
-        @deleted
+        return |@deleted
     }
 
     method push(*@values) {
diff --git a/t/spectest.data b/t/spectest.data
index 614e412181e..bd3ced42a11 100644
--- a/t/spectest.data
+++ b/t/spectest.data
@@ -30,6 +30,7 @@ integration/advent2009-day04.t
 integration/advent2009-day05.t
 integration/advent2009-day06.t
 integration/advent2009-day07.t
+integration/advent2009-day08.t
 integration/advent2009-day09.t
 integration/advent2009-day11.t
 integration/advent2009-day14.t
@@ -37,6 +38,7 @@ integration/advent2009-day15.t
 integration/advent2009-day16.t
 integration/advent2009-day17.t
 integration/advent2009-day19.t
+integration/advent2009-day20.t
 integration/advent2009-day22.t
 integration/advent2009-day23.t
 integration/code-blocks-as-sub-args.t
@@ -490,6 +492,7 @@ S32-array/splice.t
 S32-array/unshift.t
 # S32-container/zip.t
 S32-hash/exists.t
+S32-hash/delete.t
 S32-hash/invert.t
 S32-hash/keys_values.t
 S32-hash/pairs.t