From owner-dev-commits-ports-all@freebsd.org Tue Aug 31 19:26:15 2021 Return-Path: Delivered-To: dev-commits-ports-all@mailman.nyi.freebsd.org Received: from mx1.freebsd.org (mx1.freebsd.org [IPv6:2610:1c1:1:606c::19:1]) by mailman.nyi.freebsd.org (Postfix) with ESMTP id AC14F67470E; Tue, 31 Aug 2021 19:26:15 +0000 (UTC) (envelope-from git@FreeBSD.org) Received: from mxrelay.nyi.freebsd.org (mxrelay.nyi.freebsd.org [IPv6:2610:1c1:1:606c::19:3]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature RSA-PSS (4096 bits) server-digest SHA256 client-signature RSA-PSS (4096 bits) client-digest SHA256) (Client CN "mxrelay.nyi.freebsd.org", Issuer "R3" (verified OK)) by mx1.freebsd.org (Postfix) with ESMTPS id 4GzccR1Hw0z4y1G; Tue, 31 Aug 2021 19:26:15 +0000 (UTC) (envelope-from git@FreeBSD.org) Received: from gitrepo.freebsd.org (gitrepo.freebsd.org [IPv6:2610:1c1:1:6068::e6a:5]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature RSA-PSS (4096 bits) server-digest SHA256) (Client did not present a certificate) by mxrelay.nyi.freebsd.org (Postfix) with ESMTPS id 14510178DF; Tue, 31 Aug 2021 19:26:15 +0000 (UTC) (envelope-from git@FreeBSD.org) Received: from gitrepo.freebsd.org ([127.0.1.44]) by gitrepo.freebsd.org (8.16.1/8.16.1) with ESMTP id 17VJQEpJ000788; Tue, 31 Aug 2021 19:26:14 GMT (envelope-from git@gitrepo.freebsd.org) Received: (from git@localhost) by gitrepo.freebsd.org (8.16.1/8.16.1/Submit) id 17VJQE8X000787; Tue, 31 Aug 2021 19:26:14 GMT (envelope-from git) Date: Tue, 31 Aug 2021 19:26:14 GMT Message-Id: <202108311926.17VJQE8X000787@gitrepo.freebsd.org> To: ports-committers@FreeBSD.org, dev-commits-ports-all@FreeBSD.org, dev-commits-ports-main@FreeBSD.org From: Cy Schubert Subject: git: 4cf22b504ccf - main - mail/exmh2: Adjust MouseWheel scrolling parameters MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: 8bit X-Git-Committer: cy X-Git-Repository: ports X-Git-Refname: refs/heads/main X-Git-Reftype: branch X-Git-Commit: 4cf22b504ccf9e40971e8a7bcc00c91b6e61ccaf Auto-Submitted: auto-generated X-BeenThere: dev-commits-ports-all@freebsd.org X-Mailman-Version: 2.1.34 Precedence: list List-Id: Commit messages for all branches of the ports repository List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Tue, 31 Aug 2021 19:26:15 -0000 The branch main has been updated by cy: URL: https://cgit.FreeBSD.org/ports/commit/?id=4cf22b504ccf9e40971e8a7bcc00c91b6e61ccaf commit 4cf22b504ccf9e40971e8a7bcc00c91b6e61ccaf Author: Cy Schubert AuthorDate: 2021-08-31 15:17:07 +0000 Commit: Cy Schubert CommitDate: 2021-08-31 19:25:52 +0000 mail/exmh2: Adjust MouseWheel scrolling parameters Units and pages don't mean the same thing they did before. The number of pixels is in fact a divisor. - MouseWheel scrolls one line in the Folder Display box (no change). - MouseWheel scrolls five lines in the message box (no change). - Shift-MouseWheel scrolls one line (no change). - Control-MouseWheel scrolls ten lines (changed from a page as page doesn't work any more). --- mail/exmh2/Makefile | 2 +- mail/exmh2/files/patch-lib_exwin.tcl | 8 ++++---- 2 files changed, 5 insertions(+), 5 deletions(-) diff --git a/mail/exmh2/Makefile b/mail/exmh2/Makefile index a8533f5ef6c4..adf14881c048 100644 --- a/mail/exmh2/Makefile +++ b/mail/exmh2/Makefile @@ -4,7 +4,7 @@ PORTNAME= exmh PORTVERSION= 2.9.0 -PORTREVISION= 2 +PORTREVISION= 3 CATEGORIES+= mail tk # XXX: Standard SF fails with a hung download MASTER_SITES= https://sourceforge.net/projects/${PORTNAME}/files/${PORTNAME}/${PORTVERSION}/ diff --git a/mail/exmh2/files/patch-lib_exwin.tcl b/mail/exmh2/files/patch-lib_exwin.tcl index cb6639714706..0e9c3165f158 100644 --- a/mail/exmh2/files/patch-lib_exwin.tcl +++ b/mail/exmh2/files/patch-lib_exwin.tcl @@ -18,11 +18,11 @@ + # bind $bindtag [list %W yview scroll 1 pages] + # bind $bindtag [list %W yview scroll -1 pages] + -+ # tcl 8.7a5 and later (units can be pixels/units/pages). See ++ # tcl 8.7a5 and later. See + # https://core.tcl-lang.org/tips/doc/trunk/tip/474.md for more info: -+ bind $bindtag [ list tk::MouseWheel %W y %D -$num units ] -+ bind $bindtag { tk::MouseWheel %W y %D -1 units } -+ bind $bindtag { tk::MouseWheel %W y %D -1 pages } ++ bind $bindtag [ list tk::MouseWheel %W y %D [ expr 10/-$num ] pixels ] ++ bind $bindtag { tk::MouseWheel %W y %D -10 pixels } ++ bind $bindtag { tk::MouseWheel %W y %D -1 pixels } }