tec/org-mode
tec/org-mode
1
0
Fork 0
forked from mirrors/org-mode
Code Pull requests Releases Activity

Merge branch 'maint'

Browse source
This commit is contained in:
Bastien Guerry 2012-12-18 15:09:54 +01:00
parent 4996e5bd8e 374efdd63e
commit bbb451a7b6
1 changed files with 3 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
lisp/org.el
View file

@ -20606,12 +20606,9 @@ when point is at #+BEGIN_SRC or #+END_SRC."
(move-beginning-of-line 1)
(looking-at ".*#\\+\\(BEGIN\\|END\\)_SRC")))))))
(defun org-in-fixed-width-region-p ()
"Whether point is in a fixed-width region."
(save-match-data
(save-excursion
(beginning-of-line 1)
(looking-at "^: "))))
(defsubst org-in-fixed-width-region-p ()
"Is point in a fixed-width region?"
(eq 'fixed-width (org-element-type (org-element-at-point))))
(defun org-context ()
"Return a list of contexts of the current cursor position.