mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2025-01-05 11:45:52 +00:00
Code

Bugfix: Adding stars with C-c *

Browse Source 
When calling C-c * before the first headline, the results where wrong.
Fixed now.
This commit is contained in:
Carsten Dominik 2009-03-15 12:27:49 +01:00
parent e5c0da5c48
commit e56c7097f4
2 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lisp/ChangeLog
View File

@ -2,6 +2,7 @@
* org.el (org-read-date-history): New variable.
(org-read-date): Use new history variable.
(org-toggle-heading): Fix bug when used before first headline.
* org-exp.el (org-export-as-ascii): Improve export of plain lists.

7
lisp/org.el
View File

@ -14210,8 +14210,11 @@ a prefix argument is given, its value determines the number of stars to add."
?*)
(save-excursion
(re-search-backward org-complex-heading-regexp nil t)
(or (match-string 1) "*"))))
(add-stars (if nstars "" (if org-odd-levels-only "**" "*")))
(or (match-string 1) ""))))
(add-stars (cond (nstars "")
((equal stars "") "*")
(org-odd-levels-only "**")
(t "*")))
(rpl (concat stars add-stars " ")))
(while (< (setq l (1+ l)) l2)
(if itemp