diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-08-05 20:09:37 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-08-05 20:09:37 +0000 |
| commit | a5c41f64a15a2c4f029f157f7dac6b2a87e27fbc (patch) | |
| tree | fd5add8e3f55ef98931aaa9ead09bbea33da8901 /lisp/eshell/esh-util.el | |
| parent | 851988cd895db893330f3a1269d6ff6f863fcec3 (diff) | |
| download | emacs-a5c41f64a15a2c4f029f157f7dac6b2a87e27fbc.tar.gz emacs-a5c41f64a15a2c4f029f157f7dac6b2a87e27fbc.tar.bz2 emacs-a5c41f64a15a2c4f029f157f7dac6b2a87e27fbc.zip | |
Added checks that distinguish between cygwin and windows in some
places.
Diffstat (limited to 'lisp/eshell/esh-util.el')
| -rw-r--r-- | lisp/eshell/esh-util.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/eshell/esh-util.el b/lisp/eshell/esh-util.el index ef4bcda31a0..dae9655aff7 100644 --- a/lisp/eshell/esh-util.el +++ b/lisp/eshell/esh-util.el @@ -146,6 +146,10 @@ function `string-to-number'." "Return non-nil if we are running under MS-DOS/Windows." (memq system-type '(ms-dos windows-nt))) +(defsubst eshell-under-cygwin-p () + "Return non-nil if we are running under Cygwin." + (eq system-type 'cygwin32)) + (defmacro eshell-condition-case (tag form &rest handlers) "Like `condition-case', but only if `eshell-pass-through-errors' is nil." (if eshell-handle-errors |