[elpa] 01/03: [gnugo] Increase S/N for ‘C-u F’ comment.

[Thien-Thi Nguyen]

ttn pushed a commit to branch master
in repository elpa.

commit efa6d73e55c572ef9f909e6b0b78bdfacd22c650
Author: Thien-Thi Nguyen <address@hidden>
Date:   Wed Apr 16 07:02:32 2014 +0200

    [gnugo] Increase S/N for ‘C-u F’ comment.
    
    * packages/gnugo/gnugo.el (gnugo-display-final-score):
    Omit "The game is over.  " and lines w/ start/end time.
---
 packages/gnugo/gnugo.el |    5 ++++-
 1 files changed, 4 insertions(+), 1 deletions(-)

diff --git a/packages/gnugo/gnugo.el b/packages/gnugo/gnugo.el
index db3b9d5..5cb0024 100644
--- a/packages/gnugo/gnugo.el
+++ b/packages/gnugo/gnugo.el
@@ -2157,12 +2157,15 @@ to the last move, as a comment."
       (let ((node (car (aref (gnugo-get :monkey) 0))))
         (gnugo--decorate
          (delq (assq :C node) node)
-         (with-temp-buffer
+         (with-temp-buffer              ; lame
            (insert blurb)
+           (when (search-backward "\n\nGame start:" nil t)
+             (delete-region (point) (point-max)))
            (cl-flet ((rep (old new)
                           (goto-char (point-min))
                           (while (search-forward old nil t)
                             (replace-match new))))
+             (rep "The game is over.  " "")
              (rep "territory" "T")
              (rep "captures"  "C")
              (rep "komi"      "K"))