single-armed "if" -> "when"

This commit is contained in:
Masanao Igarashi
2019-08-09 18:11:59 +09:00
parent 038bce090f
commit b2b7f351e0

View File

@@ -441,7 +441,7 @@ See `org-rst-text-markup-alist' for details."
char) char)
(while (string-match "\\`*" text) (while (string-match "\\`*" text)
(setq char (match-string 0 text)) (setq char (match-string 0 text))
(if (> (match-beginning 0) 0) (when (> (match-beginning 0) 0)
(setq rtn (concat rtn (substring text 0 (match-beginning 0))))) (setq rtn (concat rtn (substring text 0 (match-beginning 0)))))
(setq text (substring text (1+ (match-beginning 0)))) (setq text (substring text (1+ (match-beginning 0))))
(setq char (concat "\\" char) (setq char (concat "\\" char)