changelog shortlog graph tags branches changeset files revisions annotate raw help

Mercurial > core / emacs/lib/slime-cape.el

changeset 622: c0062541039f
parent: cc85ab013035
child: ab02408636b7
author: Richard Westhaver <ellis@rwest.io>
date: Fri, 23 Aug 2024 19:40:56 -0400
permissions: -rw-r--r--
description: plz work 
     1 ;;; slime-cape.el --- slime completion backend for cape mode -*-lexical-binding:t-*-
     2 
     3 ;; This mode technically just connect slime-company to Cape mode
     4 ;;
     5 ;; See Also:
     6 ;;
     7 ;; [slime-company](https://github.com/anwyn/slime-company)
     8 ;; [cape](https://github.com/minad/cape)
     9 
    10 ;; Author: ccQpein
    11 ;; URL: https://github.com/ccqpein/slime-cape
    12 ;; Version: 0.1.0
    13 ;; Keywords: cape, corfu, slime, lisp
    14 ;; Package-Requires: ((slime-company "1.6"))
    15 
    16 (require 'slime)
    17 (require 'slime-company)
    18 (require 'cape)
    19 
    20 (defvar cape-slime-backend (cape-company-to-capf #'company-slime))
    21 
    22 (define-slime-contrib slime-cape
    23   (:authors "ccQpein")
    24   (:swank-dependencies swank-arglists)
    25   (:on-unload
    26    (delete cape-slime-backend completion-at-point-functions)))
    27 
    28 (defun slime-cape-maybe-enable ()
    29   (interactive)
    30   (when (slime-company-active-p)
    31     (add-to-list 'completion-at-point-functions cape-slime-backend)))
    32 
    33 (provide 'slime-cape)
    34 ;;; slime-cape.el ends here