From 30922bd7e9a2a5ebf03ed0544bd9af6f9187d175 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Fri, 21 Dec 2012 09:32:38 +0100 Subject: [PATCH] org.el (org-edit-special): Fix docstring. * org.el (org-edit-special): Fix docstring. (org-in-src-block-p): Small enhancement. --- lisp/org.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 9d2aba866..a5d48b62f 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -18968,6 +18968,7 @@ See the individual commands for more information." "Call a special editor for the stuff at point. When at a table, call the formula editor with `org-table-edit-formulas'. When in a source code block, call `org-edit-src-code'. +When in a fixed-width region, call `org-edit-fixed-width-region'. When in an #+include line, visit the included file. On a link, call `ffap' to visit the link at point. Otherwise, return a user error." @@ -20251,14 +20252,13 @@ and end of string." When INSIDE is non-nil, don't consider we are within a src block when point is at #+BEGIN_SRC or #+END_SRC." (let ((case-fold-search t) ov) - (or (when (setq ov (overlays-at (point))) - (memq 'org-block-background - (overlay-properties - (car ov)))) + (or (and (setq ov (overlays-at (point))) + (memq 'org-block-background + (overlay-properties (car ov)))) (and (not inside) (save-match-data (save-excursion - (move-beginning-of-line 1) + (beginning-of-line) (looking-at ".*#\\+\\(begin\\|end\\)_src"))))))) (defun org-context () -- 2.11.4.GIT