|
@@ -19026,14 +19026,13 @@ Otherwise, return a user error."
|
|
|
(beginning-of-line 1)
|
|
|
(looking-at "\\(?:#\\+\\(?:setupfile\\|include\\):?[ \t]+\"?\\|[ \t]*<include\\>.*?file=\"\\)\\([^\"\n>]+\\)"))
|
|
|
(find-file (org-trim (match-string 1))))
|
|
|
+ ((org-at-table.el-p) (org-edit-src-code))
|
|
|
((or (org-at-table-p)
|
|
|
(save-excursion
|
|
|
(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" "latex" "html"))
|
|
|
- (org-at-table.el-p))
|
|
|
- (org-edit-src-code))
|
|
|
+ ((org-in-block-p '("src" "example" "latex" "html")) (org-edit-src-code))
|
|
|
((org-in-fixed-width-region-p) (org-edit-fixed-width-region))
|
|
|
((org-at-regexp-p org-any-link-re) (call-interactively 'ffap))
|
|
|
(t (user-error "No special environment to edit here"))))
|