summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorCarsten Dominik <carsten.dominik@gmail.com>2013-08-31 15:44:34 +0200
committerCarsten Dominik <carsten.dominik@gmail.com>2013-08-31 15:44:34 +0200
commit7f9d0688d47140bcac7bea627474802adfce31ee (patch)
treea649c38d37169b6e1d7a5dfaf7af7487b0406adc
parent76dc3eb0af3ed715ddfbabc11a1443234f0542bd (diff)
downloadorg-mode-7f9d0688d47140bcac7bea627474802adfce31ee.tar.gz
Fix cursor movement to a specific column
* lisp/org-compat.el (org-move-to-column): Turn off invisibility stuff for moving the cursor to a column. Pathc by Nick Dokos
-rw-r--r--lisp/org-compat.el9
1 files changed, 6 insertions, 3 deletions
diff --git a/lisp/org-compat.el b/lisp/org-compat.el
index d10aeea..c4d15d8 100644
--- a/lisp/org-compat.el
+++ b/lisp/org-compat.el
@@ -336,9 +336,12 @@ Works on both Emacs and XEmacs."
(indent-line-to column)))
(defun org-move-to-column (column &optional force buffer)
- (if (featurep 'xemacs)
- (org-xemacs-without-invisibility (move-to-column column force buffer))
- (move-to-column column force)))
+ ;; 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))
+ (if (featurep 'xemacs)
+ (org-xemacs-without-invisibility (move-to-column column force buffer))
+ (move-to-column column force))))
(defun org-get-x-clipboard-compat (value)
"Get the clipboard value on XEmacs or Emacs 21."