[gegl] ops: set ui_meta of error on gluas and gegl ops

[Øyvind Kolås <ok src gnome org>]

commit fc9296a54c8f8ad046253f991ab31b6e55cdd450
Author: Øyvind Kolås <pippin gimp org>
Date:   Mon Mar 28 19:07:24 2016 +0200

    ops: set ui_meta of error on gluas and gegl ops

 operations/common/gegl.c             |    2 +-
 operations/workshop/external/gluas.c |    6 +++++-
 2 files changed, 6 insertions(+), 2 deletions(-)
---
diff --git a/operations/common/gegl.c b/operations/common/gegl.c
index 5d1cd64..5d77c76 100644
--- a/operations/common/gegl.c
+++ b/operations/common/gegl.c
@@ -26,7 +26,7 @@ property_string (string, _("pipeline"), "invert")
     ui_meta ("multiline", "true")
 
 property_string (error, _("error"), "")
-ui_meta ("error", "true")
+    ui_meta ("error", "true")
 
 #else
 
diff --git a/operations/workshop/external/gluas.c b/operations/workshop/external/gluas.c
index e74c1dd..6414925 100644
--- a/operations/workshop/external/gluas.c
+++ b/operations/workshop/external/gluas.c
@@ -31,6 +31,10 @@ property_string (script, _("Script"), THRESHOLD_SCRIPT)
     description(_("The lua script containing the implementation of this operation."))
     ui_meta    ("multiline", "true")
 
+property_string (error, _("Lua error"), "")
+    description(_("parse/compile error, if any"))
+    ui_meta    ("error", "true")
+
 property_file_path (file, _("File"), "")
     description(_("a stored lua script on disk implementing an operation."))
 
@@ -206,7 +210,7 @@ drawable_lua_process (GeglOperation       *op,
         status = lua_pcall (L, 0, LUA_MULTRET, 0);
 
       if (status != 0)
-        g_warning ("lua error: %s", lua_tostring (L, -1));
+        gegl_node_set (op->node, "error", lua_tostring (L, -1), NULL);
     }
 }