Add Whisper.

.config.d/90-experimental.el

@@ -0,0 +1,50 @@
+;;; 90-experimental.el --- Experimental packages -*- no-byte-compile: t; lexical-binding: t -*-
+
+;; Author: iamtoaster
+
+;; This file is not part of GNU Emacs
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;; This file contains experimental packages that may or may not make it to the
+;; main configuration eventually.
+
+;;; Code:
+(use-package whisper
+  
+  :straight (whisper :type git
+                        :host github
+                        :repo "natrys/whisper.el"
+                        :branch "master")
+  :init
+  (setq whisper-install-whispercpp nil)
+  :config
+  (setq whisper-quantize "q8_0"
+        whisper-model "large-v3-turbo"
+        whisper-language "auto"
+        whisper-server-mode 'local
+        whisper-server-baseurl "http://127.0.0.1:8642"
+        whisper-translate nil
+        whisper-use-threads (/ (num-processors) 2))
+
+  ;; Lets get hacking
+
+  ; The whisper is available in path, so we overwrite the search function so
+  ; that it takes the executable from there instead of the install directory.
+  (defun whisper--find-whispercpp-server ()
+    (executable-find "whisper-server")))
+
+
+;;; 90-experimental.el ends here