From 7236db6423e32d69d801f1149728138bc4ce8bb4 Mon Sep 17 00:00:00 2001
From: =?utf8?q?J=C3=A9r=C3=B4me=20Quelin?= <jquelin@gmail.com>
Date: Mon, 3 Nov 2008 20:18:08 +0100
Subject: [PATCH] use correct move_ip in str_store_char()

---
 lib/Language/Befunge/Ops.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Language/Befunge/Ops.pm b/lib/Language/Befunge/Ops.pm
index d36a29c..d1ca85b 100644
--- a/lib/Language/Befunge/Ops.pm
+++ b/lib/Language/Befunge/Ops.pm
@@ -103,7 +103,7 @@ sub str_store_char {
     my $ip = $lbi->get_curip;
 
     # Moving pointer.
-    $lbi->move_ip($lbi->get_curip);
+    $lbi->_move_ip_once($lbi->get_curip);
 
     # Fetching value.
     my $val = $ip->spop;
-- 
2.11.4.GIT