فهرست منبع

Merge branch 'maint'

Bastien 5 سال پیش
والد
کامیت
c3d5547642
1فایلهای تغییر یافته به همراه1 افزوده شده و 1 حذف شده
  1. 1 1
      lisp/org.el

+ 1 - 1
lisp/org.el

@@ -19458,7 +19458,7 @@ indent.  The function will not indent contents of example blocks,
 verse blocks and export blocks as leading white spaces are
 verse blocks and export blocks as leading white spaces are
 assumed to be significant there."
 assumed to be significant there."
   (interactive "r")
   (interactive "r")
-  (save-excursion
+  (save-window-excursion
     (goto-char start)
     (goto-char start)
     (skip-chars-forward " \r\t\n")
     (skip-chars-forward " \r\t\n")
     (unless (eobp) (beginning-of-line))
     (unless (eobp) (beginning-of-line))