Skip to main content

Emacs Github Copilot

Emacs and Github Copilot

In order to setup my Emacs to use GitHub Copilot I got my inspiration from Robert Krahn blog post about Setting up Github Copilot in Emacs .

I have a few differences in my setup:

  • Robert Krahn:
    • Defaults load Copilot, except for a list of modes where it is not relevant
    • Use an utility function that loops through 3 activation state (off, manual and full)
    • Use M-C- combinations
  • I :
    • Launch Copilot with PHP and Typescript mode hook (only for those modes)
    • Use an utility derived from Robert Krahn's one, but looping only through 2 states: off and full
    • Use the "Windows" key, which is s-

Here you are

(add-to-list 'load-path "/home/mihamina/.emacs.d/copilot")
(require 'copilot)
(defun rktmb/copilot-complete-or-accept ()
  "Command that either triggers a completion or accepts one if one
   is available. Useful if you tend to hammer your keys like I do."
  (interactive)
  (if (copilot--overlay-visible)
      (progn
        (copilot-accept-completion)
        (open-line 1)
        (next-line))
    (copilot-complete)))
    

(defun rktmb/copilot-change-activation ()
  "Switch between two activation modes:
   - manual: you need to press a key (s) to trigger completions
   - off: copilot is completely disabled."
  (interactive)
  (if copilot-mode
   (progn
     (message "deactivating copilot")
     (global-copilot-mode -1))
   (progn
     (message "activating copilot mode")
     (global-copilot-mode))))

(define-key copilot-mode-map (kbd "s-")   #'copilot-next-completion)
(define-key copilot-mode-map (kbd "s-")  #'copilot-previous-completion)
(define-key copilot-mode-map (kbd "s-")  #'copilot-accept-completion-by-word)
(define-key copilot-mode-map (kbd "s-")   #'copilot-accept-completion-by-line)
(define-key global-map       (kbd "s-") #'rktmb/copilot-complete-or-accept)
(define-key global-map       (kbd "s-") #'rktmb/copilot-change-activation)

(add-hook 'after-init-hook 'global-company-mode)

(add-hook 'js-mode-hook 'copilot-mode)
(add-hook 'typescript-mode-hook 'copilot-mode)
(add-hook 'php-mode-hook 'copilot-mode)

      

Popular posts from this blog

npm run build base-href

Using NPM to specify base-href When building an Angular application, people usually use "ng" and pass arguments to that invocation. Typically, when wanting to hard code "base-href" in "index.html", one will issue: ng build --base-href='https://ngx.rktmb.org/foo' I used to build my angular apps through Bamboo or Jenkins and they have a "npm" plugin. I got the habit to build the application with "npm run build" before deploying it. But the development team once asked me to set the "--base-href='https://ngx.rktmb.org/foo'" parameter. npm run build --base-href='https://ngx.rktmb.org/foo did not set the base href in indext.html After looking for a while, I found https://github.com/angular/angular-cli/issues/13560 where it says: You need to use −− to pass arguments to npm scripts. This did the job! The command to issue is then: npm run build -- --base-href='https://ngx.rktmb.org/foo&

Emacs Pulumi LSP

Install Pulumi Emacs Mode The source code is on https://github.com/pulumi/pulumi-lsp. At the very bottom of the page are the instructions on how to install. You Need to have make installed. $ make install emacs-client mkdir -p ./bin go build -ldflags "-X github.com/pulumi/pulumi-lsp/sdk/version.Version=v0.2.3-6-gec49054" -o ./bin -p 10 ./cmd/... go: downloading github.com/pulumi/pulumi/sdk/v3 v3.53.1 ... ... ... go install -ldflags "-X github.com/pulumi/pulumi-lsp/sdk/version.Version=v0.2.3-6-gec49054" ./cmd/... mkdir -p editors/emacs/bin cd editors/emacs && emacs -Q --batch --eval "(progn (setq package-user-dir \"$(pwd)/bin\" \ package-archives '((\"melpa\" . \"https://melpa.org/packages/\") \

emacs29 intelephense

Emacs 29 and PHP Intelephense I use to use Emacs and PHP Intelephense for PHP development. I recently upgraded to Emacs 29 and PHP Intelephense stopped working. I found a solution on Reddit Based on that, I rewrote my .emacs file to use eglot instead of lsp-mode, and this is the result. (use-package eglot :ensure t) (add-hook 'php-mode-hook 'eglot-ensure) (use-package php-mode :ensure t :mode ("\\.php\\'" . php-mode)) (add-to-list 'auto-mode-alist '("\\.php$" . php-mode)) (provide 'lang-php) (use-package company :ensure t :config (setq company-idle-delay 0.3) (global-company-mode 1) (global-set-key (kbd "M- ") 'company-complete)) (require 'eglot) (add-to-list 'eglot-server-programs '((php-mode :language-id "php") . ("intelephense" "--stdio" :initializationOptions (:licenseKey "98989898989898989898"