[ESS] skeleton-pair and XEmacs (Was: skeleton-pair and {})

[Rodney Sparapani]

Rodney Sparapani wrote:
> 
> (global-set-key "{" '(lambda ()
> (interactive)
> (let ((save-point nil))
>  (insert "{")
>  (setq save-point (point))
>  (insert "}")
>  (goto-char save-point))))

And just for fun, you can make this concisely/elegantly:

(global-set-key "{" '(lambda ()
  (interactive)
  (insert "{")
  (save-excursion (insert "}"))))