
; This example crashes weechat.
;
(define (print_cb data modifier mod-data msg)
  (string-append "Weee! " msg))

(weechat:register "modifier-2" "boxofrox" "1.0" "GPL3" "" "" "")
(define hook-ptr
  (weechat:hook_modifier "weechat_print" "print_cb" ""))

; the following line crashes weechat.
(weechat:print "" "hook created")

