diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2021-06-02 07:54:41 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2021-06-02 07:54:41 -0700 |
| commit | ed63896a29e77ea5d3aa0d9f4b5341d3149c2d0a (patch) | |
| tree | 7f785513c1b2bd48d0ccd65011b64948b26fc4c7 | |
| parent | 9823df8c051f71351a8de33d661b70afad7c2fee (diff) | |
| download | txr-ed63896a29e77ea5d3aa0d9f4b5341d3149c2d0a.tar.gz txr-ed63896a29e77ea5d3aa0d9f4b5341d3149c2d0a.tar.bz2 txr-ed63896a29e77ea5d3aa0d9f4b5341d3149c2d0a.zip | |
bug: doc function not working in Windows port.
* share/txr/stdlib/doc-lookup.tl (open-url): Handle :cygnal
together with :cygwin.
| -rw-r--r-- | share/txr/stdlib/doc-lookup.tl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/share/txr/stdlib/doc-lookup.tl b/share/txr/stdlib/doc-lookup.tl index 5e206c32..f1d0d380 100644 --- a/share/txr/stdlib/doc-lookup.tl +++ b/share/txr/stdlib/doc-lookup.tl @@ -27,7 +27,7 @@ (list url))) t (error `~s: failed to open ~s` 'open-url url)))) - ((:cygwin) + ((:cygwin :cygnal) (with-dyn-lib "shell32.dll" (deffi shell-execute "ShellExecuteW" cptr (cptr wstr wstr wstr wstr int)) |