diff options
| author | Daniel Mendler <mail@daniel-mendler.de> | 2022-11-18 15:57:19 +0100 |
|---|---|---|
| committer | Daniel Mendler <mail@daniel-mendler.de> | 2022-11-18 15:57:54 +0100 |
| commit | 568a77040081247a9595f5715bf58012bbf0d012 (patch) | |
| tree | 634d01814c5935e00329d6796bb3e57ae9ca4655 | |
| parent | 9f0cad7cd2facd38cca90778281bb10431e143cd (diff) | |
corfu-popupinfo--get-location: Support scrolling a bit further
| -rw-r--r-- | extensions/corfu-popupinfo.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/extensions/corfu-popupinfo.el b/extensions/corfu-popupinfo.el index 88d4fc0..286bbc9 100644 --- a/extensions/corfu-popupinfo.el +++ b/extensions/corfu-popupinfo.el @@ -157,7 +157,8 @@ See `frame-edges' for details.") (goto-char (point-min)) (forward-line (1- (cdr loc)))) (let ((beg (point))) - (forward-line (* 2 corfu-popupinfo-max-height)) + ;; Support a little bit of scrolling. + (forward-line (* 10 corfu-popupinfo-max-height)) (when jit-lock-mode (jit-lock-fontify-now beg (point))) (setq res (buffer-substring beg (point))) |