jessieh/eldoc-frame
jessieh/eldoc-frame
1
Fork 0
Code Issues Pull Requests Releases Activity

Make credit more regular

Browse Source 
* README.org (Credit):
* eldoc-box.el:
This commit is contained in:
Yuan Fu 2023-03-04 22:42:36 -08:00
parent 16fbf1f17f
commit d88e7a5ba1
No known key found for this signature in database
GPG Key ID: 56E19BC57664A442
2 changed files with 6 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
README.org
View File

@ -47,5 +47,6 @@ As of writing this README, eglot doesn't have a public mode hook, use this hook:
To keep eldoc from displaying documentation at point without enabling any minor mode above: =(add-to-list 'eglot-ignored-server-capabilites :hoverProvider)=. To keep eldoc from displaying documentation at point without enabling any minor mode above: =(add-to-list 'eglot-ignored-server-capabilites :hoverProvider)=.
* Contributors * Credit
- [[https://github.com/joaotavora][João Távora]] - Thanks to for [[https://github.com/joaotavora][João Távora]] for some valuable contribution and explain on eldoc and eglot internals.
- This package is initially adapted from Sebastien Chapuis’s package lsp-ui.el.

9
eldoc-box.el
View File

@ -1,13 +1,10 @@
;;; eldoc-box.el --- Display documentation in childframe -*- lexical-binding: t; -*- ;;; eldoc-box.el --- Display documentation in childframe -*- lexical-binding: t; -*-
;; Copyright (C) 2017-2018 Sebastien Chapuis, 2018 Yuan Fu ;; Copyright (C) 2018 Yuan Fu
;; Version: 1.10 ;; Version: 1.10
;; Author: Sebastien Chapuis <sebastien@chapu.is> ;; Author: Yuan Fu <casouri@gmail.com>
;; Maintainer: Yuan Fu <casouri@gmail.com>
;; Contributors:
;; João Távora <joaotavora@gmail.com>
;; URL: https://github.com/casouri/eldoc-box ;; URL: https://github.com/casouri/eldoc-box
;; Package-Requires: ((emacs "27.1")) ;; Package-Requires: ((emacs "27.1"))
@ -283,7 +280,7 @@ STR has to be a proper documentation, not empty string, not nil, etc."
"Return the side of the selected window. "Return the side of the selected window.
Symbol ‘left’ if the selected window is on the left, ‘right’ if Symbol ‘left’ if the selected window is on the left, ‘right’ if
on the right. Return ‘left’ if there is only one window." on the right. Return ‘left’ if there is only one window."
(let ((left-window(window-at 0 0))) (let ((left-window (window-at 0 0)))
(if (eq left-window (selected-window)) (if (eq left-window (selected-window))
'left 'left
'right))) 'right)))