Commits

aidan  committed e3873a8

Texinfo line-end-position -> point-at-eol, whitespace cleanup, as suggested by Katsumi Yamaoka in b9yd5ushx8q.fsf@jpl.org

  • Participants
  • Parent commits e5b342b

Comments (0)

Files changed (3)

+2005-02-23  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* texinfmt.el (texinfo-format-scan):  Silence whitespace-cleanup.
+	* texnfo-upd.el (texinfo-copy-node-name): Use point-at-eol instead 
+        of line-end-position. 
+
 2004-12-22  Norbert Koch  <viteno@xemacs.org>
 
 	* Makefile (VERSION): XEmacs package 1.28 released.
          (error "Unterminated @%s" (car (car texinfo-stack)))))
 
   ;; Remove excess whitespace
-  (whitespace-cleanup))
+  (let ((whitespace-silent t)) 
+    (whitespace-cleanup))) 
 
 (defvar texinfo-copying-text ""
   "Text of the copyright notice and copying permissions.")

File texnfo-upd.el

 after the node command up to the first comma on the line, if any, and
 return the text as a string.  Leaves point at the beginning of the
 line.  If there is no node name, returns an empty string."
-
   (save-excursion
     (buffer-substring
      (progn (forward-word 1)              ; skip over node command
 	    (skip-chars-forward " \t")    ; and over spaces
 	    (point))
-     (if (search-forward "," (line-end-position) t) ; bound search
+     (if (search-forward "," (point-at-eol) t) ; bound search 
 	 (1- (point))
        (end-of-line) (point)))))