Emacs中Ctrl-Y功能失效与复制高亮颜色异常问题求助

DevOps 小满

2026-4-21

最近我碰到了两个Emacs的小问题，试了好几种方法都没搞定，来这里请教各位大佬：

问题详情

复制文本时的选中高亮颜色突然从灰色变成了黄色，完全没印象改过相关设置，不知道哪里出了问题；
全局的Ctrl-Y（粘贴）功能突然失效了，按下后直接弹出错误提示：
```
Symbol's function definition is void: x-cut-buffer-or-selection-value
```

下面是我的.emacs配置内容：

(setq
 time-stamp-active t          ; do enable time-stamps
 time-stamp-line-limit 10     ; check first 10 buffer lines for Time-stamp:
 time-stamp-format "%04y-%02m-%02d %02H:%02M:%02S (%u)") ; date format)

(add-hook 'before-save-hook' time-stamp)

(add-hook 'isearch-mode-hook
(lambda ()
(define-key isearch-mode-map    "\C-y" 'isearch-yank-line)
(define-key isearch-mode-map "\M-s\C-e" 'isearch-yank-kill)
))

(setq isearch-mode-hook
'(lambda nil
(define-key isearch-mode-map "\C-y"   'isearch-yank-line)
(define-key isearch-mode-map "\C-f"   'isearch-repeat-forward)
(define-key isearch-mode-map "\C-t"    'isearch-toggle-regexp)))

(setq x-select-enable-clipboard t)

(setq interprogram-paste-function 'x-cut-buffer-or-selection-value)

(set-face-attribute 'default nil :font "monospace-20")

(setq lpr-command "gtklp")

(setq buffers-menu-max-size nil)

(setq ps-lpr-command "gtklp")

(setq web-mode-content-types-alist '(("jsx" . "\\.js[x]?\\'")))

(setq css-electric-keys nil)

(add-hook 'MAJORMODE-mode-hook 'my-MAJORMODE-mode-hook)

(defun my-MAJORMODE-mode-hook ()
(ELECTRICMODE-mode 0))

(defun undo-all ()
"Undo all edits."

自己的初步猜测

Ctrl-Y失效应该和那个报错的函数有关，我配置里手动指定了interprogram-paste-function为x-cut-buffer-or-selection-value，会不会这个函数在新版本Emacs里已经被移除了？
高亮颜色的问题可能是region这个face的背景色被无意中修改了，但我没加过相关配置，有点困惑。