Hi Radek,

> vip has to be run in debug mode for (doc) to work. $pil -vi +
> 
> (de *KeyMap-g
> ("h"  # Search word under cursor
>    (and (getWord T "~") (doc (car (str (pack @)) ))))#str is troublesome, be 
> carefull when modifying
>     )

Thanks!

Yes, 'str' is not necessary here. You can use 'intern' directly

   (and (getWord T) (doc (intern (pack @))))

Also, I just noticed that the second argument "~" to 'getWord' is not needed. I
don't remember what it was for ;)

☺/ A!ex

-- 
UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe

Reply via email to