fix(align): align according to text-scale (emacs-lsp#719)

* fix(align): align according to text-scale

* docs: changelog

Author: jcs090218

CHANGELOG.org

@@ -2,6 +2,9 @@
 ** Unreleased
    - Disable sideline code actions and doc on cursor hover to reduce noise features.
 
+** 8.0.1
+   - Fix sideline alignment with text-scale (#719)
+
 ** 8.0.0
    - lsp-ui version working with lsp-mode v8.0.0
 

lsp-ui-sideline.el

@@ -299,13 +299,13 @@ MARKED-STRING is the string returned by `lsp-ui-sideline--extract-info'."
   (+ (apply '+ lengths)
      (if (display-graphic-p) 1 2)))
 
-(defun lsp-ui-sideline--compute-height nil
+(defun lsp-ui-sideline--compute-height ()
   "Return a fixed size for text in sideline."
   (if (null text-scale-mode-remapping)
       '(height 1)
     ;; Readjust height when text-scale-mode is used
     (list 'height
-          (/ 1 (or (plist-get (cdr text-scale-mode-remapping) :height)
+          (/ 1 (or (plist-get (cdar text-scale-mode-remapping) :height)
                    1)))))
 
 (defun lsp-ui-sideline--make-display-string (info symbol current)