diff options
| author | Sean Allred <code@seanallred.com> | 2014-11-02 10:39:07 -0500 |
|---|---|---|
| committer | Sean Allred <code@seanallred.com> | 2014-11-02 10:39:07 -0500 |
| commit | 01307c43d70949b8bba63eaf3ddfd8a712e78875 (patch) | |
| tree | 10db10b6c2e4dfd3c79c5c5866c0bc3f917559fd | |
| parent | e91752e2d2b6c631fd774823a10868c5d7e40d8a (diff) | |
Whitespace normalization in stack-filter.el
| -rw-r--r-- | stack-filter.el | 21 |
1 files changed, 11 insertions, 10 deletions
diff --git a/stack-filter.el b/stack-filter.el index 1525a4b..75173a1 100644 --- a/stack-filter.el +++ b/stack-filter.el @@ -51,19 +51,20 @@ excluding those from EXCLUDE, using BASE as a base filter. INCLUDE and EXCLUDE must both be lists; BASE should be a symbol or string." (let ((keyword-arguments - `((include . ,(if include (mapconcat - #'stack-core-thing-as-string - include ";"))) - (exclude . ,(if exclude (mapconcat - #'stack-core-thing-as-string - exclude ";"))) - (base . ,(if base base))))) + `((include . ,(if include (mapconcat + #'stack-core-thing-as-string + include ";"))) + (exclude . ,(if exclude (mapconcat + #'stack-core-thing-as-string + exclude ";"))) + (base . ,(if base base))))) (let ((response (stack-core-make-request - "filter/create" - keyword-arguments))) + "filter/create" + keyword-arguments))) (url-hexify-string (cdr (assoc 'filter - (elt response 0))))))) + (elt response 0))))))) + (provide 'stack-filter) ;;; stack-filter.el ends here |