diff options
Diffstat (limited to 'gnu/packages/javascript.scm')
| -rw-r--r-- | gnu/packages/javascript.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/gnu/packages/javascript.scm b/gnu/packages/javascript.scm index 8731a44927a..e7dcd7962d7 100644 --- a/gnu/packages/javascript.scm +++ b/gnu/packages/javascript.scm | |||
| @@ -117,7 +117,11 @@ | |||
| 117 | (let ((minified (open-pipe* OPEN_READ "uglify-js" file))) | 117 | (let ((minified (open-pipe* OPEN_READ "uglify-js" file))) |
| 118 | (call-with-output-file installed | 118 | (call-with-output-file installed |
| 119 | (lambda (port) | 119 | (lambda (port) |
| 120 | (dump-port minified port))))) | 120 | (dump-port minified port))) |
| 121 | |||
| 122 | (let ((exit (close-pipe minified))) | ||
| 123 | (unless (zero? exit) | ||
| 124 | (error "dear, uglify-js failed" exit))))) | ||
| 121 | (else | 125 | (else |
| 122 | (install-file file (dirname installed)))))) | 126 | (install-file file (dirname installed)))))) |
| 123 | (find-files ".")) | 127 | (find-files ".")) |
