summaryrefslogtreecommitdiffstats
path: root/tools/emacs/trybot.el
diff options
context:
space:
mode:
authorevan@chromium.org <evan@chromium.org@0039d316-1c4b-4281-b951-d872f2087c98>2010-12-17 03:46:15 +0000
committerevan@chromium.org <evan@chromium.org@0039d316-1c4b-4281-b951-d872f2087c98>2010-12-17 03:46:15 +0000
commit094b705690bf7e9d7bf787e6c4a88efc92d2cdd1 (patch)
tree8039a09fa18702dca2681646612b54ef05957485 /tools/emacs/trybot.el
parentccea03c373e1efb8bd3d72212be656300e38ff1f (diff)
downloadchromium_src-094b705690bf7e9d7bf787e6c4a88efc92d2cdd1.zip
chromium_src-094b705690bf7e9d7bf787e6c4a88efc92d2cdd1.tar.gz
chromium_src-094b705690bf7e9d7bf787e6c4a88efc92d2cdd1.tar.bz2
emacs: make trybot parser work on offical windows build output
Review URL: http://codereview.chromium.org/5941003 git-svn-id: svn://svn.chromium.org/chrome/trunk/src@69510 0039d316-1c4b-4281-b951-d872f2087c98
Diffstat (limited to 'tools/emacs/trybot.el')
-rw-r--r--tools/emacs/trybot.el14
1 files changed, 9 insertions, 5 deletions
diff --git a/tools/emacs/trybot.el b/tools/emacs/trybot.el
index 0352ed5..2c65897 100644
--- a/tools/emacs/trybot.el
+++ b/tools/emacs/trybot.el
@@ -103,11 +103,15 @@
(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.
+ (command (concat "curl -s " (shell-quote-argument url)
+ ; Pipe it through the output shortener.
+ (cond
+ ((eq type-hint 'win)
(concat " | " (get-chrome-root)
- "build/sanitize-mac-build-log.sh")))))
+ "build/sanitize-win-build-log.sh"))
+ ((eq type-hint 'mac)
+ (concat " | " (get-chrome-root)
+ "build/sanitize-mac-build-log.sh"))))))
; Start up the subprocess.
(let* ((coding-system-for-read 'utf-8-dos)
@@ -154,7 +158,7 @@
(when (equal "stdio" (car (last (split-string url "/"))))
(setq url (concat url "/text")))
- (let ((type-hint (cond ((string-match "/win/" url) 'win)
+ (let ((type-hint (cond ((string-match "/[Ww]in" url) 'win)
((string-match "/mac/" url) 'mac)
; Match /linux, /linux_view, etc.
((string-match "/linux" url) 'linux)