From a1ba8869c54673400beddff04816c2d2c4a06957 Mon Sep 17 00:00:00 2001
From: Simon Wistow <simon@thegestalt.org>
Date: Mon, 7 Mar 2011 01:33:58 +0000
Subject: Fix remove_link

---
 t/90_bug_links.t | 3 +++
 1 file changed, 3 insertions(+)

(limited to 't/90_bug_links.t')

diff --git a/t/90_bug_links.t b/t/90_bug_links.t
index e1f71db..dd7cc84 100644
--- a/t/90_bug_links.t
+++ b/t/90_bug_links.t
@@ -59,4 +59,7 @@ my $links = $test_links->links;
 is $links->[0]->key, 'griffinp', 'good owner for first link';
 is $links->[1]->key, 'griffins', 'good owner for second link';
 
+$test_links->remove_link($links->[0]);
+$links = $test_links->links;
+is $links->[0]->key, 'griffins', 'good owner for second link after a remove link';
 done_testing;
-- 
cgit v1.2.3