mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-08-22 10:18:32 +00:00
Code Releases Activity

Fix bug when `org-list-two-spaces-after-bullet-regexp' would be nil.

Browse source 
* org-list.el (org-list-bullet-string): first check if
  `org-list-two-spaces-after-bullet-regexp' isn't nil.
This commit is contained in:
Nicolas Goaziou 2010-07-29 12:38:55 +02:00
parent 7eb193de1d
commit a665ecb666
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/org-list.el
View file

@ -995,7 +995,9 @@ It determines the number of whitespaces to append by looking at
(concat
bullet " "
;; Do we need to concat another white space ?
(when (string-match org-list-two-spaces-after-bullet-regexp bullet) " "))))
(when (and org-list-two-spaces-after-bullet-regexp
(string-match org-list-two-spaces-after-bullet-regexp bullet))
" "))))
(defun org-list-replace-bullet (new-bullet)
"Replace current item's bullet with NEW-BULLET.