rollback add-on function.

diff --git a/modules/ml-addon.cc b/modules/ml-addon.cc
index 7df1beb..1c3efbd 100644 (file)
--- a/modules/ml-addon.cc
+++ b/modules/ml-addon.cc
@@ -22,7 +22,6 @@
 呼び出されるプログラムのargv[1], argv[2]に，それぞれ一時ディレクトリ，保存ディレクトリのパスが引渡される。
 add-onファンクションで与える引数は，プログラムの標準入力に，改行文字区切りで与えられる。
 ファンクションの引数に改行文字が含まれている場合、空白文字に置き換えられる。
-nil引数は無視される。
 
 */
 
@@ -67,14 +66,10 @@ public:
            }
        } else {
            ustring  u;
-           MNodePtr  t;
            while (rest) {
-               t = eval (rest->car (), mlenv);
-               if (t ()) {
-                   u = t ()->to_string ();
-                   u = regex_replace (u, re_nl, uSPC, boost::regex_constants::match_single_line);
-                   par.push_back (u);
-               }
+               u = eval_str (rest->car (), mlenv);
+               u = regex_replace (u, re_nl, uSPC, boost::regex_constants::match_single_line);
+               par.push_back (u);
                nextNode (rest);
            }
        }