From 77d6d2108db07ed1457e9c409b30dffb6f24a1e2 Mon Sep 17 00:00:00 2001 From: jeremy Date: Mon, 17 Dec 2012 12:42:23 +1300 Subject: [PATCH] Add test for nil and symbol-namisation of --set arguments --- flymake-jslint.el | 24 ++++++++++++++---------- 1 file changed, 14 insertions(+), 10 deletions(-) diff --git a/flymake-jslint.el b/flymake-jslint.el index 8fbe356..b8cc8cc 100644 --- a/flymake-jslint.el +++ b/flymake-jslint.el @@ -70,17 +70,21 @@ Uses `lintnode-node-program' and `lintnode-location'." (lintnode-excludes (if (not lintnode-jslint-excludes) "" (mapconcat 'identity (mapcar 'symbol-name lintnode-jslint-excludes) ","))) - (lintnode-includes (if (not lintnode-jslint-includes) + (lintnode-includes (if (not lintnode-jslint-includes) "" - (mapconcat 'identity (mapcar 'symbol-name lintnode-jslint-includes) ",")))) - - (start-process "lintnode-server" "*lintnode*" - lintnode-node-program - lintnode-location - "--port" (number-to-string lintnode-port) - "--exclude" lintnode-excludes - "--include" lintnode-includes - "--set" lintnode-jslint-set))) + (mapconcat 'identity (mapcar 'symbol-name lintnode-jslint-includes) ","))) + (lintnode-set (if (not lintnode-jslint-set) + "" + (mapconcat 'identity (mapcar 'symbol-name lintnode-jslint-set) ","))) + ) + (start-process "lintnode-server" "*lintnode*" + lintnode-node-program + lintnode-location + "--port" (number-to-string lintnode-port) + "--exclude" lintnode-excludes + "--include" lintnode-includes + "--set" lintnode-set + ))) (defun lintnode-stop () "stop the lintnode server process"