#!/bin/bash

# Nekthuth plugin
#
Author="Frank Duncan <frank@kank.net>"
Revision="1.0"
Date="26 June 2009"
Description="Adds NekthuthDescribe to your vim repertoire and binds \\d to it.
This command will call #'describe on the message yous ent over and print it out
to the main buffer"

vim << VIMEND
command! -nargs=1 NekthuthDescribe python nekthuthDescribe('<args>')
map <Leader>d :NekthuthDescribe <C-R><C-W><CR>

python << EOF
def nekthuthDescribe (form):
  sendToBuffer('> (describe \'' + form + ')')
  sendToBuffer(lispSendReceive('e', form))
  sendToBuffer('')
EOF
VIMEND

lisp << LISPEND
(nekthuth:register-command #\e
                            (lambda (msg)
                             (with-output-to-string (*standard-output*)
                              (describe msg))))
LISPEND