Procházet zdrojové kódy

Last fixes before release.

Carsten Dominik před 17 roky
rodič
revize
292baddb44
2 změnil soubory, kde provedl 14 přidání a 2 odebrání
  1. 5 0
      ChangeLog
  2. 9 2
      org.el

+ 5 - 0
ChangeLog

@@ -1,3 +1,8 @@
+2008-03-10  Carsten Dominik  <dominik@science.uva.nl>
+
+	* org.el (org-ctrl-c-star): Implement a missing branch in the
+	decision tree.
+
 2008-03-10  Bastien Guerry  <bzg@altern.org>
 
 	* org-publish.el (org-publish-file): Send an error when file is

+ 9 - 2
org.el

@@ -27739,8 +27739,15 @@ line into a subheading."
 				(min (1+ (point-at-eol)) (point-max))))
    ((org-at-item-p)
     ;; Convert to heading
-    ;; FIXME: not yet implemented
-    )
+    (let ((level (save-match-data
+		   (save-excursion
+		     (condition-case nil
+			 (progn
+			   (org-back-to-heading t)
+			   (funcall outline-level))
+		       (error 0))))))
+      (replace-match
+       (concat (make-string (org-get-valid-level level 1) ?*) " ") t t)))
    (t (org-toggle-region-headings (point-at-bol)
 				  (min (1+ (point-at-eol)) (point-max))))))