protect against empty arg in advice to eww-external

tvraman · Nov 19, 2020 · 958ce07 · 958ce07
1 parent d11f492
commit 958ce07
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lisp/emacspeak-eww.el b/lisp/emacspeak-eww.el
@@ -1944,7 +1944,7 @@ Warning, this is fragile, and depends on a stable id/class for the
 ;;; instead.
 (defadvice eww-browse-with-external-browser(around emacspeak pre act comp)
   "Use our m-player integration."
-  (let* ((url (ad-get-arg 0))
+  (let* ((url (or (ad-get-arg 0) ""))
          (media-p (string-match emacspeak-media-extensions url)))
     (cond
      (media-p (emacspeak-m-player url))