original commit: 39bc072462c9539bde693a1756d9de34922427e9
This commit is contained in:
John Clements 2003-11-03 19:54:55 +00:00
parent e3aa7128fb
commit 910e1a848a

View File

@ -16,7 +16,8 @@
'("/usr/lib" "/usr/sbin"))
(define sendmail-program-file
(if (eq? (system-type) 'unix)
(if (or (eq? (system-type) 'unix)
(eq? (system-type) 'macosx))
(let loop ((paths sendmail-search-path))
(if (null? paths)
(raise (make-exn:misc:unsupported