Make script cross-platform.

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 89 matching lines @@
 
   (let ((on-fetch-completion
          (lambda (process state)
            (switch-to-buffer (process-buffer process))
            (when (equal state "finished\n")
              (trybot-fixup (process-get process 'type-hint)))))
         (command (concat "curl -s " url
                          (when (eq type-hint 'mac)
                            ; Pipe it through the output shortener.
                            (concat " | " (get-chrome-root)
-                                   "build/sanitize-mac-build-log.sed")))))
+                                   "build/sanitize-mac-build-log.sh")))))
 
     ; Start up the subprocess.
     (let* ((coding-system-for-read 'utf-8-dos)
            (buffer (trybot-get-new-buffer))
            (process (start-process-shell-command "curl" buffer command)))
       ; Attach the type hint to the process so we can get it back when
       ; the process completes.
       (process-put process 'type-hint type-hint)
       (set-process-query-on-exit-flag process nil)
       (set-process-sentinel process on-fetch-completion))))
@@ skipping 34 matching lines @@
     (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)