|
@@ -318,12 +318,12 @@ the fragment in the Org-mode buffer."
|
|
|
(while (re-search-forward "^[ \t]*: ?" nil t)
|
|
|
(replace-match ""))
|
|
|
(org-goto-line (1+ (- line begline)))
|
|
|
- (org-src-mode)
|
|
|
- (set-buffer-modified-p nil)
|
|
|
(org-set-local 'org-edit-src-beg-marker beg)
|
|
|
(org-set-local 'org-edit-src-end-marker end)
|
|
|
(org-set-local 'org-edit-src-overlay ovl)
|
|
|
(org-set-local 'org-edit-src-nindent nindent)
|
|
|
+ (org-src-mode)
|
|
|
+ (set-buffer-modified-p nil)
|
|
|
(and org-edit-src-persistent-message
|
|
|
(org-set-local 'header-line-format msg)))
|
|
|
(message "%s" msg)
|