[Fix #3725] Use defvaralias for x-gtk-use-system-tooltips on emacs29

clojure-emacs · Jul 20, 2024 · 87d1c71 · 87d1c71
1 parent c698e14
commit 87d1c71
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/cider-mode.el b/cider-mode.el
@@ -1062,7 +1062,12 @@ property."
 
 
 ;;; Minor-mode definition
-(defvar x-gtk-use-system-tooltips)
+
+(if (and (> emacs-major-version 28)
+         (not (boundp 'x-gtk-use-system-tooltips)))
+    ;; The x-gtk prefix has been dropped Emacs 29
+    (defvaralias 'x-gtk-use-system-tooltips 'use-system-tooltips)
+  (defvar x-gtk-use-system-tooltips))
 
 ;;;###autoload
 (define-minor-mode cider-mode