From 939d7bea8e1028ed28153def1643ede52f43f4a5 Mon Sep 17 00:00:00 2001
From: 10sr <8.slashes@gmail.com>
Date: Wed, 24 Mar 2021 17:52:56 +0900
Subject: [PATCH] Add browse-url-macosx-vivaldi-browser

---
 emacs.el | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/emacs.el b/emacs.el
index 3f6769f..cda888c 100644
--- a/emacs.el
+++ b/emacs.el
@@ -3061,6 +3061,17 @@ Any output will be written to current buffer."
   (mmv-draw-mark))
 
 
+(defun browse-url-macosx-vivaldi-browser (url &rest args)
+  "Invoke the macOS Vlvaldi Web browser with URL.
+ARGS are not used."
+  (interactive (browse-url-interactive-arg "URL: "))
+  (start-process (concat "vivaldi " url)
+                 nil
+                 "/Applications/Vivaldi.app/Contents/MacOS/Vivaldi"
+                 url))
+
+
+
 ;; https://emacs-jp.github.io/tips/startup-optimization
 ;; Restore to original value
 (setq gc-cons-threshold my-orig-gc-cons-threshold)