mirror of
https://codeberg.org/cage/tinmop/
synced 2025-02-26 09:27:36 +01:00
- prevented crash truncating the scaled width of tags window.
This commit is contained in:
parent
3daf205dd8
commit
c75efe0638
@ -67,7 +67,7 @@
|
||||
(new-messages-mark new-messages-mark)) object
|
||||
(win-clear object)
|
||||
(with-croatoan-window (croatoan-window object)
|
||||
(let ((histogram-width (* 2/3 (win-width-no-border object))))
|
||||
(let ((histogram-width (truncate (* 2/3 (win-width-no-border object)))))
|
||||
(loop
|
||||
for y from (+ 2 top-row-padding) by single-row-height
|
||||
for row-fields in (mapcar #'fields rows) do
|
||||
|
Loading…
x
Reference in New Issue
Block a user