# HG changeset patch
# User samer
# Date 1330108725 0
# Node ID fa51ed121a52913b57eb9979f92252c6062f2c81
# Parent  555b29024dab39cc506849be2fab25a9b24ac3b7
FIX: bug in call to current_engine/1

diff -r 555b29024dab -r fa51ed121a52 prolog/plml.pl
--- a/prolog/plml.pl	Fri Feb 24 18:11:23 2012 +0000
+++ b/prolog/plml.pl	Fri Feb 24 18:38:45 2012 +0000
@@ -637,10 +637,10 @@
 convert_mx(loc,    X, mat(Y,W)) :- !, mlMX2ATOM(X,Z), term_to_atom(Y|W,Z).
 
 convert_mx(mat,    X, Y) :- !, % !!! use first engine to save to its matbase
-	current_engine(I,open),  
+	current_engine(I),  
 	bt_call( db_save(I,mx(X),Y), db_drop(I,Y)).
 convert_mx(tmp,    X, Y) :- !, % !!! use first engine to save to its matbase
-	current_engine(I,open),  
+	current_engine(I),  
 	bt_call( db_tmp(I,mx(X),Y), db_drop(I,Y)).
 
 convert_mx(list(float), X, Y) :- !, mlGETREALS(X,Y).