Something like this seems to do approximately what you want:
(defun word-to-link ()
(let (start end word)
(setq start (point))
(setq end (point))
(setq word (buffer-substring start end))
(setf (buffer-substring start end)
(format [[%s]] word)
Chaitanya Krishna icym...@gmail.com writes:
Is there a shortcut to change word under cursor to an internal link?
Basically it is a pain trying to surround with two braces all the
C-c C-l does not prompt me to create an internal link.
Doherty Hall A207F
Department of Chemical Engineering
Carnegie Mellon University
Pittsburgh, PA 15213