Make credit more regular

* 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

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 Chapuiss package lsp-ui.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)))