GPTel项目：如何优化模型选择界面中的模型列表管理

在AI辅助编程工具GPTel的实际使用中，随着接入的AI服务提供商增多，用户可能会面临模型选择列表过长的问题。本文将详细介绍如何通过Elisp代码优化GPTel的模型选择界面，帮助用户更高效地管理可用模型。

问题背景

当GPTel同时接入OpenAI、Gemini和Anthropic等多个AI服务提供商时，模型选择列表会变得非常庞大（可能多达44个模型）。这不仅影响用户体验，还可能让不熟悉模型的用户难以做出最佳选择。特别是当某些模型（如gpt-3.5-turbo）在性能上明显不如其他模型（如gpt-4.0-mini）时，这种管理显得尤为重要。

解决方案

GPTel提供了灵活的Elisp接口，允许用户通过编程方式管理模型列表。核心思路是使用cl-set-difference函数从后端模型列表中移除不需要的模型。

基础实现

最简单的实现方式是针对单个后端移除指定模型：

(let ((models-to-remove '(gpt-3.5-turbo gpt-4-turbo gpt-4o)))
  (cl-callf (lambda (models) (cl-set-difference models models-to-remove))
      (gptel-backend-models (gptel-get-backend "ChatGPT")))

这段代码会从ChatGPT后端的模型列表中移除gpt-3.5-turbo、gpt-4-turbo和gpt-4o三个模型。

高级实现

对于需要管理多个后端的情况，可以编写更通用的解决方案：

(defun gptel-remove-models-from-backend (backend-name models-to-remove)
  "从指定后端移除不需要的模型"
  (cl-callf (lambda (models) (cl-set-difference models models-to-remove))
      (gptel-backend-models (gptel-get-backend backend-name)))

(let ((backend-model-removals
       '(("ChatGPT" . (gpt-3.5-turbo gpt-4-turbo gpt-4o))
         ("Gemini"  . (gemini-2.5-flash-preview-04-17))
         ("Claude"  . (claude-3-5-sonnet-20241022)))))
  (dolist (item backend-model-removals)
    (gptel-remove-models-from-backend (car item) (cdr item))))

这种实现方式允许用户为每个后端单独配置需要移除的模型列表，代码更加模块化和可维护。

最佳实践

1. 定期更新：随着AI服务提供商不断推出新模型，建议定期审查和更新模型移除列表。

2. 性能考量：可以根据官方文档或实际测试结果，移除性能较差的模型。

3. 成本控制：某些高成本模型如果使用频率低，可以考虑从列表中移除。

4. 组织方式：可以将模型管理代码放在Emacs配置文件的适当位置，确保在GPTel初始化后执行。

技术细节

• cl-callf是Common Lisp风格的函数，用于就地修改变量值
• cl-set-difference用于计算两个列表的差集
• gptel-get-backend用于获取指定名称的后端对象
• gptel-backend-models用于访问或修改后端的模型列表

通过这种灵活的模型管理方式，用户可以根据自己的需求定制GPTel的模型选择界面，提升使用效率和体验。这种设计也体现了Emacs"可编程编辑器"的核心理念，允许用户深度定制工具行为。