From bug 6057:

Lua API: add support to temporary color filters (10 color slots)

svn path=/trunk/; revision=37801

2 files changed, 20 insertions, 0 deletions

diff --git a/epan/funnel.h b/epan/funnel.h
index aa82a3bf35..bcd4e925fd 100644
--- a/epan/funnel.h
+++ b/epan/funnel.h
@@ -78,6 +78,7 @@ typedef struct _funnel_ops_t {
 	void (*copy_to_clipboard)(GString *str);
     
 	void (*set_filter)(const char*);
+        void (*set_color_filter_slot)(guint8 flit_nr, const gchar* filter);
 	gboolean (*open_file)(const char* fname, const char* filter, const char** error);
 	void (*reload)(void);
 	void (*apply_filter)(void);
diff --git a/epan/wslua/wslua_gui.c b/epan/wslua/wslua_gui.c
index 530dfba88c..dfd4ace889 100644
--- a/epan/wslua/wslua_gui.c
+++ b/epan/wslua/wslua_gui.c
@@ -801,6 +801,25 @@ WSLUA_FUNCTION wslua_set_filter(lua_State* L) { /* Set the main filter text */
 	return 0;
 }
 
+WSLUA_FUNCTION wslua_set_color_filter_slot(lua_State* L) { /* Set color of the current packet */
+#define WSLUA_ARG_set_color_filter_slot_ROW 1 /* The row count in tmp filter list */
+#define WSLUA_ARG_set_color_filter_slot_TEXT  2 /* Filter */
+	guint8 row = luaL_checkint(L,WSLUA_ARG_set_color_filter_slot_ROW);
+	const gchar* filter_str = luaL_checkstring(L,WSLUA_ARG_set_color_filter_slot_TEXT);
+
+	if (!ops->set_color_filter_slot) {
+		WSLUA_ERROR(set_color_filter_slot, "GUI not available");
+	}
+
+	if (!filter_str) {
+		WSLUA_ARG_ERROR(set_color_filter_slot,TEXT,"Must be a string");
+	}
+
+	ops->set_color_filter_slot(row, filter_str);
+
+	return 0;
+}
+
 WSLUA_FUNCTION wslua_apply_filter(lua_State* L) { /* Apply the filter in the main filter box */
 	if (!ops->apply_filter) {
 		WSLUA_ERROR(apply_filter, "GUI not available");