From c40899d8ec1452d5e1f2053c4161c3661220a6c7 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?V=C3=ADtor=20Santos=20Costa?= <vsc@dcc.fc.up.pt>
Date: Sun, 31 Jan 2016 10:45:42 +0000
Subject: [PATCH] badvar

---
 pl/consult.yap | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/pl/consult.yap b/pl/consult.yap
index 88028ec06..0acf8a650 100644
--- a/pl/consult.yap
+++ b/pl/consult.yap
@@ -1419,7 +1419,7 @@ initialization(_G,_OPT) :-
 '$initialization'(G,OPT) :-
    error:must_be_of_type(callable, G, initialization(G,OPT)),
     error:must_be_of_type(oneof([after_load, now, restore]),
-                OPT, initialization(G0,OPT)),
+                OPT, initialization(G,OPT)),
    (
 	 OPT == now
 	->