Mercurial > hg > xemacs-beta
changeset 4731:ad40dc9d3a97
Add test of nil binding of default-process-coding-system.
| author | Stephen J. Turnbull <stephen@xemacs.org> |
|---|---|
| date | Mon, 02 Nov 2009 13:29:06 +0900 |
| parents | 0e5b32398bac |
| children | 2491a837112c |
| files | tests/ChangeLog tests/automated/mule-tests.el |
| diffstat | 2 files changed, 23 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/tests/ChangeLog Mon Nov 02 13:03:37 2009 +0900 +++ b/tests/ChangeLog Mon Nov 02 13:29:06 2009 +0900 @@ -1,3 +1,8 @@ +2009-11-02 Stephen Turnbull <stephen@xemacs.org> + + * automated/mule-tests.el (default-process-coding-system): + Check that binding it to nil is OK. + 2009-11-01 Aidan Kehoe <kehoea@parhasard.net> * automated/lisp-tests.el:
--- a/tests/automated/mule-tests.el Mon Nov 02 13:03:37 2009 +0900 +++ b/tests/automated/mule-tests.el Mon Nov 02 13:29:06 2009 +0900 @@ -766,4 +766,21 @@ (format "checking Unicode coding systems behave well with short input, %02X" i))) - ) + + ;;--------------------------------------------------------------- + ;; Process tests + ;; #### Should do network too. + ;;--------------------------------------------------------------- + (Skip-Test-Unless (and (file-exists-p "/dev/null") + (fboundp 'executable-find) + (executable-find "cat")) + "cat(1) or /dev/null missing" + "Test that default-process-coding-system can be nil." + (with-temp-buffer + (Assert (let (default-process-coding-system) + (shell-command "cat </dev/null >/dev/null") + t)))) + + ) ; end of tests that require MULE built in. + +;;; end of mule-tests.el