[bot] "built_in_updates" Sat Feb 17 14:11:03 UTC 2024

syl20bnr · Feb 17, 2024 · 4a227fc · 4a227fc
1 parent 58b34a8
commit 4a227fc
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/core/libs/package-build-badges.el b/core/libs/package-build-badges.el
@@ -40,7 +40,7 @@
 This is essentially a copy of `elpaa--make-badge'."
  (let* ((file (expand-file-name (concat name "-badge.svg") target-dir))
  (left (or archive (car package-build-badge-data) "myElpa"))
- (right (url-hexify-string version))
+ (right version)
  (color (or color (cadr package-build-badge-data) "#ff491b"))
  (lw (package-build-badge--string-width left))
  (rw (package-build-badge--string-width right))

diff --git a/core/libs/page-break-lines.el b/core/libs/page-break-lines.el
@@ -126,7 +126,7 @@ its display table will be modified as necessary."
  (let ((default-height (face-attribute 'default :height nil 'default)))
  (set-face-attribute 'page-break-lines nil :height default-height)
  (let* ((char-relative-width (if (fboundp 'string-pixel-width)
- (/ (string-pixel-width (make-string 100 page-break-lines-char))
+ (/ (float (string-pixel-width (make-string 100 page-break-lines-char)))
  (string-pixel-width (make-string 100 ?a)))
  (char-width page-break-lines-char)))
  (width (floor (window-max-chars-per-line) char-relative-width))