From ad4a1e4ac6b9452bb28936623035d01bb03f36f2 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?John=20Ankarstr=C3=B6m?= Date: Tue, 2 Aug 2022 22:19:03 +0200 Subject: Remember data list view height across sessions. --- pl/cfg.pl | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'pl/cfg.pl') diff --git a/pl/cfg.pl b/pl/cfg.pl index 54b5544..297d426 100644 --- a/pl/cfg.pl +++ b/pl/cfg.pl @@ -67,3 +67,10 @@ get_focus(V) :- integer(V), ! ; V = 1 ). + +set_dlv_height(V) :- set_key('DlvHeight', V). +get_dlv_height(V) :- + ( get_key('DlvHeight', V), + integer(V), ! + ; V = 0 + ). -- cgit v1.2.3