Hi Lindsay,
> I have been digging into the vip code recently. Initially to get a better
> understanding on namespacing and scope in pil21.
> ...
> I added a couple of cmds (not yet moved to viprc) to encrypt and decrypt
> entire buffers ...
>
> I've been a bit stuck on how to enter the "yek" encryption key (ideally
> twice for confirmation) without echoing to the display.
> Is there a straightforward way to do that?
In some other project I used this:
(de getPw ()
(pack
(make
(until (sub? (setq C (key)) "^J^M")
(if (= "^?" C)
(made (cdr (rot (made))))
(link C) ) ) ) ) )
You could call it twice:
(with *CmdWin
(let K (getPw)
(when (= K (getPw))
...
☺/ A!ex
--
UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe
