[elpa] master 218fd5a: [gnugo int] Use ‘line-end-position’.

[Thien-Thi Nguyen]

branch: master
commit 218fd5aabd0fe0f5c3f17e97744b5ae6a24b21d6
Author: Thien-Thi Nguyen <address@hidden>
Commit: Thien-Thi Nguyen <address@hidden>

    [gnugo int] Use ‘line-end-position’.
    
    * packages/gnugo/gnugo.el (gnugo-propertize-board-buffer):
    ...here, to replace several instances of ‘end-of-line’ plus ‘point’.
---
 packages/gnugo/gnugo.el |   11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/packages/gnugo/gnugo.el b/packages/gnugo/gnugo.el
index 5b27b91..879c85e 100644
--- a/packages/gnugo/gnugo.el
+++ b/packages/gnugo/gnugo.el
@@ -652,8 +652,8 @@ when you are sure the command cannot fail."
     (put-text-property (point) (1+ (point)) 'category (gnugo-f 'tpad))
     (skip-chars-forward " ")
     (put-text-property (1- (point)) (point) 'category %gpad)
-    (put-text-property (point) (progn (end-of-line) (point)) 'category %gspc)
-    (forward-char 1)
+    (put-text-property (point) (line-end-position) 'category %gspc)
+    (forward-line 1)
     (add-text-properties (1+ (point-min)) (1- (point)) grid-props)
     (while (looking-at "\\s-*\\([0-9]+\\)[ ]")
       (let* ((row (match-string-no-properties 1))
@@ -714,13 +714,12 @@ when you are sure the command cannot fail."
                 (end (match-end 2)))
             (put-text-property beg end :gnugo-cf (cons (- end beg) prop))
             (gnugo-put prop (match-string-no-properties 2))))
-        (end-of-line)
-        (put-text-property right-empty (point) 'category %rpad)
-        (forward-char 1)))
+        (put-text-property right-empty (line-end-position) 'category %rpad)
+        (forward-line 1)))
     (add-text-properties (1- (point)) (point-max) grid-props)
     (skip-chars-forward " ")
     (put-text-property (1- (point)) (point) 'category %gpad)
-    (put-text-property (point) (progn (end-of-line) (point))
+    (put-text-property (point) (line-end-position)
                        'category %gspc)))
 
 (defun gnugo-merge-showboard-results ()