diff --git a/source/clog-system.lisp b/source/clog-system.lisp index ded0503..e64baef 100644 --- a/source/clog-system.lisp +++ b/source/clog-system.lisp @@ -113,5 +113,8 @@ function. If BOOT-FILE is nil path is removed." (defun open-browser (&key (url "http://127.0.0.1:8080")) "Launch on os a web browser on local machine to URL. See BROWSER-OPEN for openning windows on remote machines." - (trivial-open-browser:open-browser url)) + (handler-case (progn + (trivial-open-browser:open-browser url)) + (error (c) + (format t "Unable to open browser.~%~%~A" c))))