[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
parametrized function definition
From: |
Joe Bloggs |
Subject: |
parametrized function definition |
Date: |
Tue, 08 Jul 2008 18:07:09 +0100 |
User-agent: |
Gnus/5.110006 (No Gnus v0.6) Emacs/21.4 (gnu/linux) |
Hi, I am trying to write a function that allows me to quickly bind a key
combination
to insert arbitrary text:
(defun set-local-key-insert ()
"set a local key to insert some text"
(interactive)
(let (keystring textinsert)
(setq keystring (read-key-sequence "Key combination to bind: "))
(setq textinsert (read-string "Text to insert: "))
(local-set-key (read-kbd-macro keystring) (lambda () (interactive) (insert
textinsert)))
)
)
However, this doesn't work since textinsert is not evaluated until the function
is called with the keybinding. How can I get this to work properly? I am new to
elisp so I imagine it's very simple.
Thanks.