help-gnu-emacs
[Top][All Lists]
Advanced

[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.


reply via email to

[Prev in Thread] Current Thread [Next in Thread]