Procházet zdrojové kódy

Silence byte-compiler

Nicolas Goaziou před 7 roky
rodič
revize
a374b8b92a
1 změnil soubory, kde provedl 1 přidání a 3 odebrání
  1. 1 3
      lisp/org.el

+ 1 - 3
lisp/org.el

@@ -20324,7 +20324,6 @@ This command does many different things, depending on context:
 	 ;; first item in the list.  Without an argument, repair the
 	 ;; list.
 	 (let* ((begin (org-element-property :contents-begin context))
-		(beginm (move-marker (make-marker) begin))
 		(struct (org-element-property :structure context))
 		(old-struct (copy-tree struct))
 		(first-box (save-excursion
@@ -20348,8 +20347,7 @@ This command does many different things, depending on context:
 	     (org-list-set-checkbox begin struct new-box)))
 	   (org-list-write-struct
 	    struct (org-list-parents-alist struct) old-struct)
-	   (org-update-checkbox-count-maybe)
-	   (save-excursion (goto-char beginm) (org-list-send-list 'maybe))))
+	   (org-update-checkbox-count-maybe)))
 	((or `property-drawer `node-property)
 	 (call-interactively #'org-property-action))
 	(`radio-target