summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/perl/textui/TextUI.xs19
-rw-r--r--src/perl/textui/module.h1
2 files changed, 20 insertions, 0 deletions
diff --git a/src/perl/textui/TextUI.xs b/src/perl/textui/TextUI.xs
index a958e202..1c7488ea 100644
--- a/src/perl/textui/TextUI.xs
+++ b/src/perl/textui/TextUI.xs
@@ -117,6 +117,25 @@ gui_printtext(xpos, ypos, str)
int ypos
char *str
+void
+gui_input_set(str)
+ char *str
+CODE:
+ gui_entry_set_text(active_entry, str);
+
+int
+gui_input_get_pos()
+CODE:
+ RETVAL = gui_entry_get_pos(active_entry);
+OUTPUT:
+ RETVAL
+
+void
+gui_input_set_pos(pos)
+ int pos
+CODE:
+ gui_entry_set_pos(active_entry, pos);
+
MODULE = Irssi::TextUI PACKAGE = Irssi::UI::Window
void
diff --git a/src/perl/textui/module.h b/src/perl/textui/module.h
index 9123afb2..d8af5b48 100644
--- a/src/perl/textui/module.h
+++ b/src/perl/textui/module.h
@@ -6,6 +6,7 @@
#include "statusbar.h"
#include "textbuffer.h"
#include "textbuffer-view.h"
+#include "gui-entry.h"
typedef MAIN_WINDOW_REC *Irssi__TextUI__MainWindow;
typedef TEXT_BUFFER_REC *Irssi__TextUI__TextBuffer;