diff options
| author | Bastien Guerry <bzg@altern.org> | 2012-12-23 17:54:42 +0100 |
|---|---|---|
| committer | Bastien Guerry <bzg@altern.org> | 2012-12-23 17:54:42 +0100 |
| commit | 98a5f3df328d883c43081d565d91edf3f29648da (patch) | |
| tree | bf6ebde2da4117827f9d90823698e03eea8801ac | |
| parent | f0a64ab3b5c46c8c7b1c838de2ed20511357e43d (diff) | |
| download | org-mode-98a5f3df328d883c43081d565d91edf3f29648da.tar.gz | |
Don't allow special edit in verbatim blocks.
* org.el (org-edit-special): Don't edit in verbatim blocks.
* org-src.el (org-edit-src-code): Ditto.
| -rw-r--r-- | lisp/org-src.el | 4 | ||||
| -rw-r--r-- | lisp/org.el | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/lisp/org-src.el b/lisp/org-src.el index 0ac2f02..e55675a 100644 --- a/lisp/org-src.el +++ b/lisp/org-src.el @@ -210,8 +210,8 @@ edited version. An optional argument CONTEXT is used by \\[org-edit-src-save] when calling this function. See `org-src-window-setup' to configure the display of windows containing the Org buffer and the code buffer." (interactive) - (if (not (org-in-block-p '("src" "example" "verbatim"))) - (user-error "Not in a source code block") + (if (not (org-in-block-p '("src" "example"))) + (user-error "Not in a source code or example block") (unless (eq context 'save) (setq org-edit-src-saved-temp-window-config (current-window-configuration))) (let* ((mark (and (org-region-active-p) (mark))) diff --git a/lisp/org.el b/lisp/org.el index 44633eb..2193dc9 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -18996,7 +18996,7 @@ Otherwise, return a user error." (beginning-of-line 1) (let ((case-fold-search )) (looking-at "[ \t]*#\\+tblfm:")))) (call-interactively 'org-table-edit-formulas)) - ((or (org-in-block-p '("src" "example" "verbatim")) + ((or (org-in-block-p '("src" "example")) (org-at-table.el-p)) (org-edit-src-code)) ((org-in-fixed-width-region-p) (org-edit-fixed-width-region)) |