emacs-orgmode@gnu.org archives
 help / color / mirror / code / Atom feed
From: Bowen Li <bowenli37@gmail.com>
To: emacs-orgmode@gnu.org
Subject: My attempt of org babel inline src block highlighting
Date: Wed, 18 Dec 2013 16:13:49 +0800	[thread overview]
Message-ID: <CAGsp5KS1bSFyOzVa2AC=hDtHqxWzdVP_Q2bHv98rpWOB8j4f3Q@mail.gmail.com> (raw)

[-- Attachment #1: Type: text/plain, Size: 784 bytes --]

Hi,

I just naively modified org-fontify-drawers to fontify org babel inline src
block. The result looks reasonable to me. I put these two functions in a
src block in my org file and executed it, then refreshed display with M-x
org-mode.


(defun org-fontify-inline-src-block (limit)
  "Fontify inline source block."
  (when (re-search-forward org-babel-inline-src-block-regexp limit t)
    (add-text-properties
     *(match-beginning 1*) (match-end 0)
     '(font-lock-fontified t face (t (:foreground "#008ED1" :background
"#FFFFEA"))))
    (org-remove-flyspell-overlays-in (match-beginning 0) (match-end 0))
    t))

(defun org-set-font-lock-defaults ()
......
   ;; Drawers
   '(org-fontify-drawers)
 *  ;; Inline source block*
*   '(org-fontify-inline-src-block)*

Cheers,
Bowen

[-- Attachment #2: Type: text/html, Size: 1323 bytes --]

             reply	other threads:[~2013-12-18  8:13 UTC|newest]

Thread overview: 2+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2013-12-18  8:13 Bowen Li [this message]
2013-12-18  9:49 ` My attempt of org babel inline src block highlighting Sebastien Vauban

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.orgmode.org/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to='CAGsp5KS1bSFyOzVa2AC=hDtHqxWzdVP_Q2bHv98rpWOB8j4f3Q@mail.gmail.com' \
    --to=bowenli37@gmail.com \
    --cc=emacs-orgmode@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body. 
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).