Mercurial > emacs

changeset 72923:32eea9088623

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Remove mistakenly-added debugging code.
author Chong Yidong <cyd@stupidchicken.com>
date Sat, 16 Sep 2006 14:19:31 +0000
parents e5dae51e141c
children d50645027830
files lisp/simple.el
diffstat 1 files changed, 0 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/simple.el	Sat Sep 16 14:14:53 2006 +0000
+++ b/lisp/simple.el	Sat Sep 16 14:19:31 2006 +0000
@@ -3645,9 +3645,6 @@
 	  ;; 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 @@
 
 	;; 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.