Merge branch 'maint'

lisp/org-agenda.el

@@ -9145,7 +9145,7 @@ Called with a universal prefix arg, show the priority instead of setting it."
       (goto-char (point-max))
       (while (not (bobp))
 	(when (equal marker (org-get-at-bol 'org-marker))
-	  (org-move-to-column (- (window-width) (length stamp)) t)
+	  (org-move-to-column (- (window-width) (length stamp)) t nil t)
 	  (org-agenda-fix-tags-filter-overlays-at (point))
           (if (featurep 'xemacs)
 	      ;; Use `duplicable' property to trigger undo recording

lisp/org-compat.el

@@ -335,10 +335,8 @@ Works on both Emacs and XEmacs."
       (org-xemacs-without-invisibility (indent-line-to column))
     (indent-line-to column)))
 
-(defun org-move-to-column (column &optional force buffer)
-  ;; set buffer-invisibility-spec to nil so that move-to-column
-  ;; does the right thing despite the presence of invisible text.
-  (let ((buffer-invisibility-spec nil))
+(defun org-move-to-column (column &optional force buffer ignore-invisible)
+  (let ((buffer-invisibility-spec ignore-invisible))
     (if (featurep 'xemacs)
 	(org-xemacs-without-invisibility (move-to-column column force buffer))
       (move-to-column column force))))