forked from mirrors/org-mode
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.
This commit is contained in:
parent
f0a64ab3b5
commit
98a5f3df32
|
@ -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)))
|
||||
|
|
|
@ -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))
|
||||
|
|
Loading…
Reference in a new issue