diff options
| author | Bastien Guerry <bzg@altern.org> | 2012-12-13 23:45:55 +0100 |
|---|---|---|
| committer | Bastien Guerry <bzg@altern.org> | 2012-12-13 23:45:55 +0100 |
| commit | 22e4a4ecb9c36bddf7960f532838ddbbddb21414 (patch) | |
| tree | dba8bee06ab2196ad2467631c635057ada91de21 | |
| parent | 0584dffefedb8858ae304d9352aa0f6c92f6b905 (diff) | |
| download | org-mode-22e4a4ecb9c36bddf7960f532838ddbbddb21414.tar.gz | |
Revert "org-src.el (org-edit-src-code): Fix bug on Emacs <24.1."
This reverts commit 7a770c10c142dae5e585c529c2232affbc313585.
| -rw-r--r-- | lisp/org-src.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/org-src.el b/lisp/org-src.el index d2c3e19..f91da19 100644 --- a/lisp/org-src.el +++ b/lisp/org-src.el @@ -228,11 +228,12 @@ buffer." (full-info (org-babel-get-src-block-info 'light)) (org-mode-p (derived-mode-p 'org-mode)) ;; derived-mode-p is reflexive (beg (make-marker)) - (end (make-marker)) + ;; Move marker with inserted text for case when src block is + ;; just one empty line, i.e. beg == end. + (end (copy-marker nil t)) (allow-write-back-p (null code)) block-nindent total-nindent ovl lang lang-f single lfmt buffer msg begline markline markcol line col transmitted-variables) - (set-marker-insertion-type end t) (if (not info) nil (setq beg (move-marker beg (nth 0 info)) |