diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 06b9b0f5c..8fd5f3fe4 100755 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2009-03-14 Bastien Guerry + + * org.el (org-toggle-fixed-width-section): Bug fix: insert a + column and a space, not only a column. + 2009-03-14 Carsten Dominik * org-export-latex.el (org-export-latex-emphasis-alist): Better diff --git a/lisp/org.el b/lisp/org.el index 510962f28..75e42a912 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -15267,7 +15267,7 @@ this line is also exported in fixed-width font." (end (if regionp (region-end))) (nlines (or arg (if (and beg end) (count-lines beg end) 1))) (case-fold-search nil) - (re "[ \t]*\\(:\\)") + (re "[ \t]*\\(: \\)") off) (if regionp (save-excursion @@ -15281,11 +15281,11 @@ this line is also exported in fixed-width font." (cond (arg (org-move-to-column cc t) - (insert ":\n") + (insert ": \n") (forward-line -1)) ((and off (looking-at re)) (replace-match "" t t nil 1)) - ((not off) (org-move-to-column cc t) (insert ":"))) + ((not off) (org-move-to-column cc t) (insert ": "))) (forward-line 1))) (save-excursion (org-back-to-heading)