Easy insert of verbatim symbols

From: "Sébastien Vauban" <wxhgmqzgwmuf-geNee64TY+gS+FvcfC7Uqw@public.gmane.org>
To: emacs-orgmode-mXXj517/zsQ@public.gmane.org
Subject: Easy insert of verbatim symbols
Date: Tue, 19 Oct 2010 12:53:24 +0200	[thread overview]
Message-ID: <80vd4ybgij.fsf@mundaneum.com> (raw)

Hello,

I often find it tedious to add `=' signs before and after the words that you
want to be rendered in verbatim, moreover when you want to do that in your
text, once it already has been written.

Adding this to your =.emacs=:

#+begin_src emacs-lisp
(defun insert-one-equal-or-two ()
  (interactive)
  (cond
   ((or (bolp) (not (looking-back "=")))
    ;; insert just one =
    (self-insert-command 1))
   ((save-excursion
      (backward-char)
      ;; Skip symbol backwards.
      (and (not (zerop (skip-syntax-backward "w_")))
           (not (looking-back "="))
           (or (insert-and-inherit "=") t))))
   (t
    ;; insert == around following symbol
    (delete-backward-char 1)
    (unless (looking-back "=") (insert-and-inherit "="))
    (save-excursion
      (skip-syntax-forward "w_")
      (unless (looking-at "=") (insert-and-inherit "="))))))

(define-key org-mode-map (kbd "=") 'insert-one-equal-or-two)
#+end_src

allows you to add just an equal sign at the end of the word, and the one is
front is automatically added...

Best regards,
  Seb

-- 
Sébastien Vauban

_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode-mXXj517/zsQ@public.gmane.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode