emacs: fix HTML urls to automatically load plain text

tools/emacs/trybot.el

 ; To use this,
 ; 1) Add to init.el:
 ;    (setq-default chrome-root "/path/to/chrome/src/")
 ;    (add-to-list 'load-path (concat chrome-root "tools/emacs"))
 ;    (require 'trybot)
 ; 2) Run on trybot output:
 ;    M-x trybot
 ;
 ; To hack on this,
 ; M-x eval-buffer
@@ skipping 131 matching lines @@
 (defun trybot (url)
   "Fetch a trybot URL and fix up the output into a compilation-mode buffer."
   (interactive "sURL to trybot stdout (leave empty to use clipboard): ")
 
   ;; Yank URL from clipboard if necessary.
   (when (= (length url) 0)
     (with-temp-buffer
       (clipboard-yank)
       (setq url (buffer-string))))
 
-  ;; TODO: fixup URL to append /text if necessary.
+  ;; Append /text to the URL to get plain text output in the common
+  ;; case of getting a URL to the HTML build log.
+  (when (equal "stdio" (car (last (split-string url "/"))))
+    (setq url (concat url "/text")))
 
   (let ((type-hint (cond ((string-match "/win/" url) 'win)
                          ((string-match "/mac/" url) 'mac)
                          ; Match /linux, /linux_view, etc.
                          ((string-match "/linux" url) 'linux)
                          (t 'unknown))))
     (trybot-fetch type-hint url)))
 
 (provide 'trybot)