diff --git a/lisp/org-mouse.el b/lisp/org-mouse.el
index 3b2c4cba6..e0671f3d7 100644
--- a/lisp/org-mouse.el
+++ b/lisp/org-mouse.el
@@ -975,7 +975,7 @@ This means, between the beginning of line and the point."
   (interactive)
   (org-back-to-heading)
   (let ((minlevel 1000)
-	(replace-text (concat (match-string 0) "* ")))
+	(replace-text (concat (make-string (org-current-level) ?*) "* ")))
     (beginning-of-line 2)
     (save-excursion
       (while (not (or (eobp) (looking-at org-outline-regexp)))