diff --git a/lisp/init-ai.el b/lisp/init-ai.el
index 8ad99e7..667812e 100644
--- a/lisp/init-ai.el
+++ b/lisp/init-ai.el
@@ -3,27 +3,33 @@
 
 ;;; Code:
 
+(defun deepseek-api-key-path ()
+  "Return the path to the DeepSeek API key file."
+  (expand-file-name "~/.config/llm/deepseek/api_key.txt"))
+
+(defun read-deepseek-api-key ()
+  "Read and return the DeepSeek API key from the configured file."
+  (with-temp-buffer
+    (insert-file-contents (deepseek-api-key-path))
+    (string-trim (buffer-string))))
+
 (use-package gptel
   :ensure t
   :config
   (setq gptel-model "deepseek-chat")
   (setq gptel-default-mode 'org-mode)
-  (setq	(gptel-make-openai "DeepSeek"
-	  :host "api.deepseek.com"
-	  :endpoint "/chat/completions"
-	  :stream t
-	  :key (with-temp-buffer
-		 (insert-file-contents "~/.config/llm/deepseek/api_key.txt")
-		 (string-trim (buffer-string)))
-	  :models '("deepseek-chat" "deepseek-coder"))))
+  (setq (gptel-make-openai "DeepSeek"
+          :host "api.deepseek.com"
+          :endpoint "/chat/completions"
+          :stream t
+          :key (read-deepseek-api-key)
+          :models '("deepseek-chat" "deepseek-coder"))))
 
 ;; aider.el
 (add-to-list 'load-path "~/.emacs.d/site-lisp/aider/")
 (require 'aider)
 (setq aider-args '("--model" "deepseek/deepseek-coder"))
-(setenv "DEEPSEEK_API_KEY" (with-temp-buffer
-                            (insert-file-contents "~/.config/llm/deepseek/api_key.txt")
-                            (string-trim (buffer-string))))
+(setenv "DEEPSEEK_API_KEY" (read-deepseek-api-key))
 
 (provide 'init-ai)
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;