add extra packages
This commit is contained in:
parent
d388672a3f
commit
554d5e62c2
47
code/elpa/helm-xref-20211017.1334/helm-xref-autoloads.el
Normal file
47
code/elpa/helm-xref-20211017.1334/helm-xref-autoloads.el
Normal file
|
|
@ -0,0 +1,47 @@
|
||||||
|
;;; helm-xref-autoloads.el --- automatically extracted autoloads -*- lexical-binding: t -*-
|
||||||
|
;;
|
||||||
|
;;; Code:
|
||||||
|
|
||||||
|
(add-to-list 'load-path (directory-file-name
|
||||||
|
(or (file-name-directory #$) (car load-path))))
|
||||||
|
|
||||||
|
|
||||||
|
;;;### (autoloads nil "helm-xref" "helm-xref.el" (0 0 0 0))
|
||||||
|
;;; Generated autoloads from helm-xref.el
|
||||||
|
|
||||||
|
(autoload 'helm-xref-show-xrefs "helm-xref" "\
|
||||||
|
Function to display XREFS.
|
||||||
|
|
||||||
|
Needs to be set the value of `xref-show-xrefs-function'.
|
||||||
|
|
||||||
|
\(fn XREFS ALIST)" nil nil)
|
||||||
|
|
||||||
|
(autoload 'helm-xref-show-xrefs-27 "helm-xref" "\
|
||||||
|
Function to display XREFS.
|
||||||
|
|
||||||
|
Needs to be set the value of `xref-show-xrefs-function'.
|
||||||
|
|
||||||
|
\(fn FETCHER ALIST)" nil nil)
|
||||||
|
|
||||||
|
(autoload 'helm-xref-show-defs-27 "helm-xref" "\
|
||||||
|
Function to display list of definitions.
|
||||||
|
|
||||||
|
\(fn FETCHER ALIST)" nil nil)
|
||||||
|
|
||||||
|
(if (< emacs-major-version 27) (setq xref-show-xrefs-function 'helm-xref-show-xrefs) (progn (setq xref-show-xrefs-function 'helm-xref-show-xrefs-27) (setq xref-show-definitions-function 'helm-xref-show-defs-27)))
|
||||||
|
|
||||||
|
(register-definition-prefixes "helm-xref" '("helm-xref-"))
|
||||||
|
|
||||||
|
;;;***
|
||||||
|
|
||||||
|
;;;### (autoloads nil nil ("helm-xref-pkg.el") (0 0 0 0))
|
||||||
|
|
||||||
|
;;;***
|
||||||
|
|
||||||
|
;; Local Variables:
|
||||||
|
;; version-control: never
|
||||||
|
;; no-byte-compile: t
|
||||||
|
;; no-update-autoloads: t
|
||||||
|
;; coding: utf-8
|
||||||
|
;; End:
|
||||||
|
;;; helm-xref-autoloads.el ends here
|
||||||
13
code/elpa/helm-xref-20211017.1334/helm-xref-pkg.el
Normal file
13
code/elpa/helm-xref-20211017.1334/helm-xref-pkg.el
Normal file
|
|
@ -0,0 +1,13 @@
|
||||||
|
(define-package "helm-xref" "20211017.1334" "Helm interface for xref results"
|
||||||
|
'((emacs "25.1")
|
||||||
|
(helm "1.9.4"))
|
||||||
|
:commit "ea0e4ed8a9baf236e4085cbc7178241f109a53fa" :authors
|
||||||
|
'(("Fritz Stelzer" . "brotzeitmacher@gmail.com"))
|
||||||
|
:maintainers
|
||||||
|
'(("Fritz Stelzer" . "brotzeitmacher@gmail.com"))
|
||||||
|
:maintainer
|
||||||
|
'("Fritz Stelzer" . "brotzeitmacher@gmail.com")
|
||||||
|
:url "https://github.com/brotzeit/helm-xref")
|
||||||
|
;; Local Variables:
|
||||||
|
;; no-byte-compile: t
|
||||||
|
;; End:
|
||||||
200
code/elpa/helm-xref-20211017.1334/helm-xref.el
Normal file
200
code/elpa/helm-xref-20211017.1334/helm-xref.el
Normal file
|
|
@ -0,0 +1,200 @@
|
||||||
|
;;; helm-xref.el --- Helm interface for xref results -*- lexical-binding: t -*-
|
||||||
|
|
||||||
|
;; Copyright (C) 2017 Fritz Stelzer <brotzeitmacher@gmail.com>
|
||||||
|
|
||||||
|
;; Author: Fritz Stelzer <brotzeitmacher@gmail.com>
|
||||||
|
;; URL: https://github.com/brotzeit/helm-xref
|
||||||
|
;; Version: 1.0
|
||||||
|
;; Package-Requires: ((emacs "25.1") (helm "1.9.4"))
|
||||||
|
|
||||||
|
;;; License:
|
||||||
|
;;
|
||||||
|
;; This program is free software; you can redistribute it and/or
|
||||||
|
;; modify it under the terms of the GNU General Public License
|
||||||
|
;; as published by the Free Software Foundation; either version 3
|
||||||
|
;; of the License, or (at your option) any later version.
|
||||||
|
|
||||||
|
;; This program is distributed in the hope that it will be useful,
|
||||||
|
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
|
;; GNU General Public License for more details.
|
||||||
|
|
||||||
|
;;; Contributors:
|
||||||
|
;; Sanjeev Sivasankaran <kalasalatemp at gmail.com> in 2019 changed font-face.
|
||||||
|
|
||||||
|
;;; Code:
|
||||||
|
|
||||||
|
(require 'helm)
|
||||||
|
(require 'helm-utils)
|
||||||
|
(require 'xref)
|
||||||
|
(require 'cl-seq)
|
||||||
|
|
||||||
|
(defvar helm-xref-alist nil
|
||||||
|
"Holds helm candidates.")
|
||||||
|
|
||||||
|
(defgroup helm-xref nil
|
||||||
|
"Xref with helm."
|
||||||
|
:prefix "helm-xref-" :group 'helm)
|
||||||
|
|
||||||
|
(defface helm-xref-file-name
|
||||||
|
'((t (:inherit 'font-lock-builtin-face)))
|
||||||
|
"Face for xref file name"
|
||||||
|
:group 'helm-xref)
|
||||||
|
|
||||||
|
(defface helm-xref-line-number
|
||||||
|
'((t (:inherit 'helm-grep-lineno)))
|
||||||
|
"Face for xref line number"
|
||||||
|
:group 'helm-xref)
|
||||||
|
|
||||||
|
(defcustom helm-xref-candidate-formatting-function 'helm-xref-format-candidate-short
|
||||||
|
"Select the function for candidate formatting."
|
||||||
|
:type '(radio
|
||||||
|
(function-item helm-xref-format-candidate-short)
|
||||||
|
(function-item helm-xref-format-candidate-full-path)
|
||||||
|
(function-item helm-xref-format-candidate-long)
|
||||||
|
function)
|
||||||
|
:group 'helm-xref)
|
||||||
|
|
||||||
|
(defcustom helm-xref-input ""
|
||||||
|
"Initial input in Helm."
|
||||||
|
:type 'string
|
||||||
|
:group 'helm-xref)
|
||||||
|
|
||||||
|
(defun helm-xref-candidates-26 (xrefs)
|
||||||
|
"Convert XREF-ALIST items to helm candidates and add them to `helm-xref-alist'."
|
||||||
|
(dolist (xref xrefs)
|
||||||
|
(let* ((summary (xref-item-summary xref))
|
||||||
|
(location (xref-item-location xref))
|
||||||
|
(line (xref-location-line location))
|
||||||
|
(file (xref-location-group location))
|
||||||
|
candidate)
|
||||||
|
(setq candidate
|
||||||
|
(funcall helm-xref-candidate-formatting-function file line summary))
|
||||||
|
(push (cons candidate xref) helm-xref-alist)))
|
||||||
|
(setq helm-xref-alist (reverse helm-xref-alist)))
|
||||||
|
|
||||||
|
(defun helm-xref-candidates-27 (fetcher alist)
|
||||||
|
"Convert XREF-ALIST items to helm candidates and add them to `helm-xref-alist'."
|
||||||
|
(cl-assert (functionp fetcher))
|
||||||
|
(let* ((xrefs
|
||||||
|
(or
|
||||||
|
(assoc-default 'fetched-xrefs alist)
|
||||||
|
(funcall fetcher))))
|
||||||
|
(dolist (xref xrefs)
|
||||||
|
(let* ((summary (xref-item-summary xref))
|
||||||
|
(location (xref-item-location xref))
|
||||||
|
(line (xref-location-line location))
|
||||||
|
(file (xref-location-group location))
|
||||||
|
candidate)
|
||||||
|
(setq candidate
|
||||||
|
(funcall helm-xref-candidate-formatting-function file line summary))
|
||||||
|
(push (cons candidate xref) helm-xref-alist))))
|
||||||
|
(setq helm-xref-alist (reverse helm-xref-alist)))
|
||||||
|
|
||||||
|
(defun helm-xref-format-candidate-short (file line summary)
|
||||||
|
"Build short form of candidate format with FILE, LINE, and SUMMARY."
|
||||||
|
(concat
|
||||||
|
(propertize (car (reverse (split-string file "\\/")))
|
||||||
|
'font-lock-face 'helm-xref-file-name)
|
||||||
|
(when (string= "integer" (type-of line))
|
||||||
|
(concat
|
||||||
|
":"
|
||||||
|
(propertize (int-to-string line)
|
||||||
|
'font-lock-face 'helm-xref-line-number)))
|
||||||
|
":"
|
||||||
|
summary))
|
||||||
|
|
||||||
|
(defun helm-xref-format-candidate-full-path (file line summary)
|
||||||
|
"Same as `helm-xref-format-candidate-short', but display entire path."
|
||||||
|
(concat
|
||||||
|
(propertize file 'font-lock-face 'helm-xref-file-name)
|
||||||
|
(when (string= "integer" (type-of line))
|
||||||
|
(concat
|
||||||
|
":"
|
||||||
|
(propertize (int-to-string line)
|
||||||
|
'font-lock-face 'helm-xref-line-number)))
|
||||||
|
":"
|
||||||
|
summary))
|
||||||
|
|
||||||
|
(defun helm-xref-format-candidate-long (file line summary)
|
||||||
|
"Use two lines for each candidate. One contains the path and the other the actual candidate."
|
||||||
|
(concat
|
||||||
|
(propertize file 'font-lock-face 'helm-xref-file-name)
|
||||||
|
(when (string= "integer" (type-of line))
|
||||||
|
(concat
|
||||||
|
"\n:"
|
||||||
|
(propertize (int-to-string line)
|
||||||
|
'font-lock-face 'helm-xref-line-number)))
|
||||||
|
":"
|
||||||
|
summary))
|
||||||
|
|
||||||
|
(defun helm-xref-goto-xref-item (item func)
|
||||||
|
"Set buffer and point according to xref-item ITEM.
|
||||||
|
|
||||||
|
Use FUNC to display buffer."
|
||||||
|
(let* ((summary (xref-item-summary item))
|
||||||
|
(location (xref-item-location item))
|
||||||
|
(marker (xref-location-marker location))
|
||||||
|
(buf (marker-buffer marker))
|
||||||
|
(offset (marker-position marker)))
|
||||||
|
(switch-to-buffer buf)
|
||||||
|
(goto-char offset)
|
||||||
|
(funcall func buf)))
|
||||||
|
|
||||||
|
(defun helm-xref-source ()
|
||||||
|
"Return a `helm' source for xref results."
|
||||||
|
(helm-build-sync-source "Helm Xref"
|
||||||
|
:candidates helm-xref-alist
|
||||||
|
:persistent-action (lambda (item)
|
||||||
|
(helm-xref-goto-xref-item
|
||||||
|
item '(lambda (buf) (helm-highlight-current-line))))
|
||||||
|
:action '(("Switch to buffer" . (lambda (item) (helm-xref-goto-xref-item item 'switch-to-buffer)))
|
||||||
|
("Other window" . (lambda (item) (helm-xref-goto-xref-item item 'switch-to-buffer-other-window))))
|
||||||
|
:candidate-number-limit 9999))
|
||||||
|
|
||||||
|
;;;###autoload
|
||||||
|
(defun helm-xref-show-xrefs (xrefs _alist)
|
||||||
|
"Function to display XREFS.
|
||||||
|
|
||||||
|
Needs to be set the value of `xref-show-xrefs-function'."
|
||||||
|
(setq helm-xref-alist nil)
|
||||||
|
(helm-xref-candidates-26 xrefs)
|
||||||
|
(helm :sources (helm-xref-source)
|
||||||
|
:truncate-lines t
|
||||||
|
:input helm-xref-input
|
||||||
|
:buffer "*helm-xref*"))
|
||||||
|
|
||||||
|
;;;###autoload
|
||||||
|
(defun helm-xref-show-xrefs-27 (fetcher alist)
|
||||||
|
"Function to display XREFS.
|
||||||
|
|
||||||
|
Needs to be set the value of `xref-show-xrefs-function'."
|
||||||
|
(setq helm-xref-alist nil)
|
||||||
|
(helm-xref-candidates-27 fetcher alist)
|
||||||
|
(helm :sources (helm-xref-source)
|
||||||
|
:truncate-lines t
|
||||||
|
:buffer "*helm-xref*"))
|
||||||
|
|
||||||
|
;;;###autoload
|
||||||
|
(defun helm-xref-show-defs-27 (fetcher alist)
|
||||||
|
"Function to display list of definitions."
|
||||||
|
(let ((xrefs (funcall fetcher)))
|
||||||
|
(cond
|
||||||
|
((not (cdr xrefs))
|
||||||
|
(xref-pop-to-location (car xrefs)
|
||||||
|
(assoc-default 'display-action alist)))
|
||||||
|
(t
|
||||||
|
(helm-xref-show-xrefs-27 fetcher
|
||||||
|
(cons (cons 'fetched-xrefs xrefs)
|
||||||
|
alist))))))
|
||||||
|
|
||||||
|
;;;###autoload
|
||||||
|
(progn
|
||||||
|
(if (< emacs-major-version 27)
|
||||||
|
(setq xref-show-xrefs-function 'helm-xref-show-xrefs)
|
||||||
|
(progn
|
||||||
|
(setq xref-show-xrefs-function 'helm-xref-show-xrefs-27)
|
||||||
|
(setq xref-show-definitions-function 'helm-xref-show-defs-27))))
|
||||||
|
|
||||||
|
(provide 'helm-xref)
|
||||||
|
;;; helm-xref.el ends here
|
||||||
48
code/elpa/lsp-origami-20211016.1045/lsp-origami-autoloads.el
Normal file
48
code/elpa/lsp-origami-20211016.1045/lsp-origami-autoloads.el
Normal file
|
|
@ -0,0 +1,48 @@
|
||||||
|
;;; lsp-origami-autoloads.el --- automatically extracted autoloads -*- lexical-binding: t -*-
|
||||||
|
;;
|
||||||
|
;;; Code:
|
||||||
|
|
||||||
|
(add-to-list 'load-path (directory-file-name
|
||||||
|
(or (file-name-directory #$) (car load-path))))
|
||||||
|
|
||||||
|
|
||||||
|
;;;### (autoloads nil "lsp-origami" "lsp-origami.el" (0 0 0 0))
|
||||||
|
;;; Generated autoloads from lsp-origami.el
|
||||||
|
|
||||||
|
(autoload 'lsp-origami-try-enable "lsp-origami" "\
|
||||||
|
Turn on `origami-mode' locally and try to enable `lsp-origami-mode'." t nil)
|
||||||
|
|
||||||
|
(autoload 'lsp-origami-mode "lsp-origami" "\
|
||||||
|
Toggle code folding support for origami.
|
||||||
|
|
||||||
|
This is a minor mode. If called interactively, toggle the
|
||||||
|
`Lsp-Origami mode' mode. If the prefix argument is positive,
|
||||||
|
enable the mode, and if it is zero or negative, disable the mode.
|
||||||
|
|
||||||
|
If called from Lisp, toggle the mode if ARG is `toggle'. Enable
|
||||||
|
the mode if ARG is nil, omitted, or is a positive number.
|
||||||
|
Disable the mode if ARG is a negative number.
|
||||||
|
|
||||||
|
To check whether the minor mode is enabled in the current buffer,
|
||||||
|
evaluate `lsp-origami-mode'.
|
||||||
|
|
||||||
|
The mode's hook is called both when the mode is enabled and when
|
||||||
|
it is disabled.
|
||||||
|
|
||||||
|
\(fn &optional ARG)" t nil)
|
||||||
|
|
||||||
|
(register-definition-prefixes "lsp-origami" '("lsp-origami--"))
|
||||||
|
|
||||||
|
;;;***
|
||||||
|
|
||||||
|
;;;### (autoloads nil nil ("lsp-origami-pkg.el") (0 0 0 0))
|
||||||
|
|
||||||
|
;;;***
|
||||||
|
|
||||||
|
;; Local Variables:
|
||||||
|
;; version-control: never
|
||||||
|
;; no-byte-compile: t
|
||||||
|
;; no-update-autoloads: t
|
||||||
|
;; coding: utf-8
|
||||||
|
;; End:
|
||||||
|
;;; lsp-origami-autoloads.el ends here
|
||||||
15
code/elpa/lsp-origami-20211016.1045/lsp-origami-pkg.el
Normal file
15
code/elpa/lsp-origami-20211016.1045/lsp-origami-pkg.el
Normal file
|
|
@ -0,0 +1,15 @@
|
||||||
|
(define-package "lsp-origami" "20211016.1045" "origami.el support for lsp-mode"
|
||||||
|
'((origami "1.0")
|
||||||
|
(lsp-mode "6.1"))
|
||||||
|
:commit "5b88ab77dc2696c93fa5dd9debe183821c533b71" :authors
|
||||||
|
'(("Vibhav Pant"))
|
||||||
|
:maintainers
|
||||||
|
'(("Vibhav Pant"))
|
||||||
|
:maintainer
|
||||||
|
'("Vibhav Pant")
|
||||||
|
:keywords
|
||||||
|
'("languages" "lsp-mode")
|
||||||
|
:url "https://github.com/emacs-lsp/lsp-origami")
|
||||||
|
;; Local Variables:
|
||||||
|
;; no-byte-compile: t
|
||||||
|
;; End:
|
||||||
88
code/elpa/lsp-origami-20211016.1045/lsp-origami.el
Normal file
88
code/elpa/lsp-origami-20211016.1045/lsp-origami.el
Normal file
|
|
@ -0,0 +1,88 @@
|
||||||
|
;;; lsp-origami.el --- origami.el support for lsp-mode -*- lexical-binding: t; -*-
|
||||||
|
|
||||||
|
;; Copyright (C) 2019-2020 Vibhav Pant <vibhavp@gmail.com>
|
||||||
|
|
||||||
|
;; Author: Vibhav Pant
|
||||||
|
;; Version: 1.0.0
|
||||||
|
;; Keywords: languages lsp-mode
|
||||||
|
;; Package-Requires: ((origami "1.0") (lsp-mode "6.1"))
|
||||||
|
;; URL: https://github.com/emacs-lsp/lsp-origami
|
||||||
|
|
||||||
|
;; This program is free software; you can redistribute it and/or modify
|
||||||
|
;; it under the terms of the GNU General Public License as published by
|
||||||
|
;; the Free Software Foundation, either version 3 of the License, or
|
||||||
|
;; (at your option) any later version.
|
||||||
|
|
||||||
|
;; This program is distributed in the hope that it will be useful,
|
||||||
|
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
|
;; GNU General Public License for more details.
|
||||||
|
|
||||||
|
;; You should have received a copy of the GNU General Public License
|
||||||
|
;; along with this program. If not, see <https://www.gnu.org/licenses/>.
|
||||||
|
|
||||||
|
;;; Commentary:
|
||||||
|
|
||||||
|
;; lsp-origami provides support for origami.el using language server
|
||||||
|
;; protocol's "textDocument/foldingRange" functionality. It can be enabled
|
||||||
|
;; with
|
||||||
|
;; (require 'lsp-origami)
|
||||||
|
;; (add-hook 'lsp-after-open-hook #'lsp-origami-try-enable)
|
||||||
|
|
||||||
|
;;; Code:
|
||||||
|
|
||||||
|
(require 'origami)
|
||||||
|
(require 'lsp-mode)
|
||||||
|
|
||||||
|
(defun lsp-origami--folding-range-to-fold (range create)
|
||||||
|
"Using the components of RANGE as arguments, execute the CREATE callback."
|
||||||
|
(funcall create
|
||||||
|
(lsp--folding-range-beg range)
|
||||||
|
(lsp--folding-range-end range)
|
||||||
|
0
|
||||||
|
(seq-map
|
||||||
|
(lambda (range) (lsp-origami--folding-range-to-fold range create))
|
||||||
|
(seq-remove (lambda (child-range)
|
||||||
|
(or (eq (lsp--folding-range-beg child-range)
|
||||||
|
(lsp--folding-range-beg range))
|
||||||
|
(eq (lsp--folding-range-end child-range)
|
||||||
|
(lsp--folding-range-end range))))
|
||||||
|
(lsp--folding-range-children range)))))
|
||||||
|
|
||||||
|
|
||||||
|
(defun lsp-origami--parser (create)
|
||||||
|
"Get a list of Folding Ranges for the current buffer, with CREATE as the origami callback."
|
||||||
|
(lambda (_content)
|
||||||
|
(unless (lsp-feature? "foldingRangeProvider")
|
||||||
|
(signal 'lsp-capability-not-supported (list "foldingRangeProvider")))
|
||||||
|
(seq-map (lambda (range)
|
||||||
|
(lsp-origami--folding-range-to-fold range create))
|
||||||
|
(lsp--get-nested-folding-ranges))))
|
||||||
|
|
||||||
|
;;;###autoload
|
||||||
|
(defun lsp-origami-try-enable ()
|
||||||
|
"Turn on `origami-mode' locally and try to enable `lsp-origami-mode'."
|
||||||
|
(interactive)
|
||||||
|
(origami-mode 1)
|
||||||
|
(cond ((lsp-feature? "textDocument/foldingRange")
|
||||||
|
(lsp-origami-mode 1))
|
||||||
|
((called-interactively-p 'any)
|
||||||
|
(signal 'lsp-capability-not-supported (list "foldingRangeProvider")))
|
||||||
|
(t
|
||||||
|
(lsp-log "This server does not support foldingRangeProvider"))))
|
||||||
|
|
||||||
|
;;;###autoload
|
||||||
|
(define-minor-mode lsp-origami-mode
|
||||||
|
"Toggle code folding support for origami."
|
||||||
|
:group 'lsp-origami
|
||||||
|
:global nil
|
||||||
|
(cond
|
||||||
|
(lsp-origami-mode
|
||||||
|
(setq-local origami-fold-style 'lsp-mode)
|
||||||
|
(setq-local origami-parser-alist
|
||||||
|
(cons '(lsp-mode . lsp-origami--parser) origami-parser-alist)))
|
||||||
|
(t
|
||||||
|
(setq-local origami-fold-style nil))))
|
||||||
|
|
||||||
|
(provide 'lsp-origami)
|
||||||
|
;;; lsp-origami.el ends here
|
||||||
|
|
@ -73,7 +73,7 @@
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
; additional packages
|
; additional packages
|
||||||
(add-to-list 'package-selected-packages
|
(add-to-list 'package-selected-packages
|
||||||
'(json-mode python-mode powershell rust-mode origami go-mode yaml-mode lua-mode)
|
'(helm-lsp lsp-ui lsp-mode json-mode python-mode powershell rust-mode origami go-mode yaml-mode lua-mode)
|
||||||
)
|
)
|
||||||
(when (not kmn/is-dayjob)
|
(when (not kmn/is-dayjob)
|
||||||
(add-to-list 'package-selected-packages
|
(add-to-list 'package-selected-packages
|
||||||
|
|
|
||||||
Reference in a new issue