summaryrefslogtreecommitdiff
path: root/lisp/simple.el
diff options
context:
space:
mode:
authorChong Yidong <cyd@stupidchicken.com>2006-09-16 14:19:31 +0000
committerChong Yidong <cyd@stupidchicken.com>2006-09-16 14:19:31 +0000
commit77745e189236a5303052b462a2879a7f5689c5a3 (patch)
treea35b9be818914daeb62ccfb71898733c012b7781 /lisp/simple.el
parent095f9ae4085c0ba71028efdf69693576abfe1597 (diff)
Remove mistakenly-added debugging code.
Diffstat (limited to 'lisp/simple.el')
-rw-r--r--lisp/simple.el4
1 files changed, 0 insertions, 4 deletions
diff --git a/lisp/simple.el b/lisp/simple.el
index 7d1b71fc498..3e089d4e1a8 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -3645,9 +3645,6 @@ Outline mode sets this."
;; This is the value the function returns.
(= arg 0))
- (setq foo (list (point)
- (or goal-column temporary-goal-column)
- opoint forward))
(cond ((> arg 0)
;; If we did not move down as far as desired,
;; at least go to end of line.
@@ -3681,7 +3678,6 @@ Outline mode sets this."
;; Move to the desired column.
(line-move-to-column column)
- (push (list (point) line-beg line-end) foo)
(setq new (point))
;; Process intangibility within a line.