cage
/
tinmop
mirror of https://codeberg.org/cage/tinmop/
1
0
Fork 0
Code Issues

- fixed positioning of links window.

This commit is contained in:
cage 2022-03-04 14:44:21 +01:00
parent 45d74863c3
commit b0aacba4cb
2 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/open-attach-window.lisp
View File

@ -64,10 +64,10 @@
(/ win-w 2))))
(t
(win-x reference-window))))
(y (if command-line:*gemini-full-screen-mode*
0
(y (if center-position
(truncate (- (/ (win-height *main-window*) 2)
(/ win-h 2))))))
(/ win-h 2)))
0)))
(setf (background croatoan-window)
(tui:make-win-background bg))
(setf (bgcolor croatoan-window) bg)

3
src/open-message-link-window.lisp
View File

@ -20,7 +20,8 @@
(defmethod refresh-config :after ((object open-message-link-window))
(open-attach-window:refresh-view-links-window-config object
swconf:+key-open-message-link-window+))
swconf:+key-open-message-link-window+
:center-position (center-position object)))
(defmethod resync-rows-db ((object open-message-link-window) &key
(redraw t)