Potentially fixing #285

Author: xenodium

chatgpt-shell-anthropic.el

@@ -195,7 +195,7 @@ or
                             (mapconcat (lambda (content)
                                          (let-alist content
                                            .text))
-                                       .content)))))
+                                       .content "")))))
       response
     (if-let ((chunks (shell-maker--split-text raw-response)))
       (let ((response)

chatgpt-shell-google.el

@@ -229,7 +229,7 @@ For example:
                                          (let-alist choice
                                            (or .delta.content
                                                .message.content)))
-                                       .choices)))))
+                                       .choices "")))))
       response
     (if-let ((chunks (shell-maker--split-text raw-response)))
       (let ((response)

chatgpt-shell-openai.el

@@ -207,7 +207,7 @@ Otherwise:
                                          (let-alist choice
                                            (or .delta.content
                                                .message.content)))
-                                       .choices)))))
+                                       .choices "")))))
       response
     (when-let ((chunks (shell-maker--split-text raw-response)))
       (let ((response)
@@ -227,7 +227,7 @@ Otherwise:
                                                 (let-alist choice
                                                   (or .delta.content
                                                       .message.content)))
-                                              .choices)))))
+                                              .choices "")))))
                     (unless (string-empty-p text)
                       (setq response (concat response text)))
                   (setq pending (concat pending

chatgpt-shell-perplexity.el

@@ -158,7 +158,7 @@ Otherwise:
                                                   .message.content)
                                                  (t
                                                   ""))))
-                                       .choices)))))
+                                       .choices "")))))
       (let ((citations (let-alist whole
                          .citations)))
         (chatgpt-shell-perplexity--expand-citations
@@ -183,7 +183,7 @@ Otherwise:
                                                   (let-alist choice
                                                     (or .delta.content
                                                         .message.content)))
-                                                .choices)))))
+                                                .choices "")))))
                       (progn
                         (setq citations (let-alist obj
                                           .citations))