On 25/10/2007, Seweryn Kokot <[EMAIL PROTECTED]> wrote:
> A minor inconvenience is a warning when compiling the code
First, here's the version after Bastien's and Carsten's comments:
(defun local-org-insert-stars ()
(interactive)
(when (looking-back "^ +" (point-at-bol))
(replace-string " " "*" nil (point-at-bol) (point)))
(org-self-insert-command 1))
> .emacs:2604:30:Warning: `replace-string' used from Lisp code
> That command is designed for interactive use only.
> How to get rid of this?
This is what I came up with after following the suggestion from the
manual, but it looks complicated to me, so I don't really like it:
(defun local-org-insert-stars ()
(interactive)
(when (looking-back "^ +" (point-at-bol))
(save-excursion
(while (search-backward " " (point-at-bol) t)
(replace-match "*" nil t))))
(org-self-insert-command 1))
Piotr
_______________________________________________
Emacs-orgmode mailing list
Remember: use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
