From 0f5d73c2da91398add811e640014edfb46e889c1 Mon Sep 17 00:00:00 2001 From: Ralf Ertzinger Date: Sun, 14 Apr 2013 22:12:41 +0200 Subject: [PATCH] Add skeleton for weechat plugin --- videosite-weechat.pl | 31 +++++++++++++++++++++++++++++++ 1 file changed, 31 insertions(+) create mode 100644 videosite-weechat.pl diff --git a/videosite-weechat.pl b/videosite-weechat.pl new file mode 100644 index 0000000..1f26b32 --- /dev/null +++ b/videosite-weechat.pl @@ -0,0 +1,31 @@ +#!/usr/bin/perl -w + +use strict; +use Data::Dumper; + +weechat::register( + "videosite", + "Ralf Ertzinger (ralf\@skytale.net)", + "0.1", + "GPL", + "videosite Video URL grabber script (usage: /videosite)", + "", + ""); +weechat::hook_command( + "videosite", + "videosite control functions", + "", + "", + "", + "videosite_hook", + ""); + +sub videosite_hook { + my ($data, $buffer, $args) = @_; + + weechat::print("", sprintf("Data: %s", Dumper($data))); + weechat::print("", sprintf("Buffer: %s", Dumper($buffer))); + weechat::print("", sprintf("Args: %s", Dumper($args))); + + return weechat::WEECHAT_RC_OK; +} -- 1.8.3.1