Просмотр исходного кода

Fix `org-decrease-number-at-point'

* lisp/org.el (org-decrease-number-at-point): Handle the case when INC
  is nil.
Nicolas Goaziou 10 лет назад
Родитель
Сommit
157591db7c
1 измененных файлов с 1 добавлено и 1 удалено
  1. 1 1
      lisp/org.el

+ 1 - 1
lisp/org.el

@@ -20779,7 +20779,7 @@ this numeric value."
 With an optional prefix numeric argument INC, decrement using
 With an optional prefix numeric argument INC, decrement using
 this numeric value."
 this numeric value."
   (interactive "p")
   (interactive "p")
-  (org-increase-number-at-point (- inc)))
+  (org-increase-number-at-point (- (or inc 1))))
 
 
 (defun org-ctrl-c-ret ()
 (defun org-ctrl-c-ret ()
   "Call `org-table-hline-and-move' or `org-insert-heading' dep. on context."
   "Call `org-table-hline-and-move' or `org-insert-heading' dep. on context."