From mboxrd@z Thu Jan  1 00:00:00 1970
Path: news.gmane.org!.POSTED!not-for-mail
From: Stephen Berman <stephen.berman@gmx.net>
Newsgroups: gmane.emacs.devel
Subject: Re: auto-hscroll only the current line in a window
Date: Fri, 19 May 2017 00:13:47 +0200
Message-ID: <87o9upu82s.fsf@rosalinde>
References: <83k25d52kr.fsf@gnu.org>
NNTP-Posting-Host: blaine.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
X-Trace: blaine.gmane.org 1495145644 22021 195.159.176.226 (18 May 2017 22:14:04 GMT)
X-Complaints-To: usenet@blaine.gmane.org
NNTP-Posting-Date: Thu, 18 May 2017 22:14:04 +0000 (UTC)
User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.0.50 (gnu/linux)
Cc: emacs-devel@gnu.org
To: Eli Zaretskii <eliz@gnu.org>
Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Fri May 19 00:13:58 2017
Return-path: <emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org>
Envelope-to: ged-emacs-devel@m.gmane.org
Original-Received: from lists.gnu.org ([208.118.235.17])
	by blaine.gmane.org with esmtp (Exim 4.84_2)
	(envelope-from <emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org>)
	id 1dBTgD-0005Z8-N0
	for ged-emacs-devel@m.gmane.org; Fri, 19 May 2017 00:13:57 +0200
Original-Received: from localhost ([::1]:55736 helo=lists.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org>)
	id 1dBTgJ-0007U1-6k
	for ged-emacs-devel@m.gmane.org; Thu, 18 May 2017 18:14:03 -0400
Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:39968)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <stephen.berman@gmx.net>) id 1dBTgD-0007Tp-PE
	for emacs-devel@gnu.org; Thu, 18 May 2017 18:13:58 -0400
Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <stephen.berman@gmx.net>) id 1dBTgC-0004dh-Rj
	for emacs-devel@gnu.org; Thu, 18 May 2017 18:13:57 -0400
Original-Received: from mout.gmx.net ([212.227.17.22]:52273)
	by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16)
	(Exim 4.71) (envelope-from <stephen.berman@gmx.net>)
	id 1dBTg8-0004cK-1j; Thu, 18 May 2017 18:13:52 -0400
Original-Received: from rosalinde ([83.135.5.130]) by mail.gmx.com (mrgmx101
	[212.227.17.168]) with ESMTPSA (Nemesis) id 0M20Jj-1e003z05qV-00u2fV;
	Fri, 19 May 2017 00:13:48 +0200
In-Reply-To: <83k25d52kr.fsf@gnu.org> (Eli Zaretskii's message of "Thu, 18 May
	2017 23:31:48 +0300")
X-Provags-ID: V03:K0:FT+PTlYBI/jpPB/7Oohpo2pS76NsrqocipOJwSjIEyZM4qaS7AW
	I/uH7NHSDRDsTJ9gt3Py+Bar79pZhes91N5QALDE/5Y3X0z/0yfjEIMcxsTyez73GAn7Elk
	eqHugGSxBSGywred9bTXP4IfwlnA4qBugKBD/33seVB/70qL6xzrhhlEo+K8dvcmOChMy+3
	JfRYRGNMMiGvSdTS8pTBw==
X-UI-Out-Filterresults: notjunk:1;V01:K0:/NYiqryxHfY=:EhXWivrxYIylHw21fzj160
	saWo+uQJVL++OMs8HaskR2Cdq7AM6kOE0CAdEOvYgrjRT7kE9yrRkeK+qXPuaP73p7o9A6kT3
	cac/tbzDKRgHpOqZ+9WKEFLJAGXNVjeeLHpdRuFtvTJZYCrEuqN9apOBM17SEhJRKKmELT0tG
	Dtr3YlXVrRySHLOiIiies81oA3AAbrQTeKmJGNDlu7l6XkGs3NeRVIPl5cOnZJZP5YPhcyJ2r
	VQxPdGBjPGY/G738w4gWX7LX0B9pkoy4JaC1satjLEZoKLlS3n0GePb8tMZPMElvX8dyN/pyc
	VAaX1ZRmmg567KT+xrtXoePzwTc/EeJyFrxoacgJSh83DN/OEF2LNTjEBr/IHPJG+HHIaWsbr
	apRaIsGDwbJuqmjkJ0UOSwlUNc6uj5pI5nHeOQ6qXULyGM4O/a06VvrdyUoWdtAfo8AwSsMiV
	0l3Xdswk7RRMe3ffZvDudOB3j3rzW7Lrz8mppQyUEvE5fWEM9NxaybXmc1DDK4I6Lo4unbSCB
	k/igbBwSwKichY5QdTPgKe6L+WATNv8MirV2p1eEEexoDrI+kluQdUYpQpww65heO7bnC0/JV
	XTPuqISC0dMnIWkYaOVb5k2IFf50s8ZgudjvzaoSIT0jBVurzUHlp8JayP9IBI6SAMtXEYPQA
	0zSNHOBRweQ7cvtW//cnYpOGyGoWAdlRhLV/7tf25CxKaKJIs8pw3c1Lx+uBeMJ6/AHHC/FKF
	UtbSfK7Rd2jOl3jE+YWd50cLWRNjIwlHmOEolMjRP1wxHoFmo7VPUjkh+ltcQG7BGq1FVrlf 
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
	[fuzzy]
X-Received-From: 212.227.17.22
X-BeenThere: emacs-devel@gnu.org
X-Mailman-Version: 2.1.21
Precedence: list
List-Id: "Emacs development discussions." <emacs-devel.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/emacs-devel>,
	<mailto:emacs-devel-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/emacs-devel/>
List-Post: <mailto:emacs-devel@gnu.org>
List-Help: <mailto:emacs-devel-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/emacs-devel>,
	<mailto:emacs-devel-request@gnu.org?subject=subscribe>
Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org
Original-Sender: "Emacs-devel" <emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org>
Xref: news.gmane.org gmane.emacs.devel:214966
Archived-At: <http://permalink.gmane.org/gmane.emacs.devel/214966>

On Thu, 18 May 2017 23:31:48 +0300 Eli Zaretskii <eliz@gnu.org> wrote:

> Someone on reddit got excited about such a feature in Nano, so I came
> up with its emulation, see the latest trunk.  Give it a try and see if
> you like it.  It looks cool, but I cannot really think why would I
> need it in Real Life=E2=84=A2.
>
> Caveat: the feature might have some rough edges, and I expect a few of
> them to be insoluble, since some parts of the display engine simply
> cannot work 100% correctly with this feature, without a thorough
> redesign.  But it seemed to work surprisingly well in my testing, so
> maybe the problems only rarely rear their head.  Report any problems
> you see, of course.
>
> Enjoy.

I just tried it and it seems to work well and looks pretty nice.  One
thing missing is an update of the Customize interface for this user
option, perhaps like this (capitalization and style are not consistent
across Customize tags, I used ones that appears several times):

diff --git a/lisp/cus-start.el b/lisp/cus-start.el
index 117b23debe..08a2d0f29f 100644
--- a/lisp/cus-start.el
+++ b/lisp/cus-start.el
@@ -556,7 +556,12 @@ minibuffer-prompt-properties--setter
 		      (const :tag "Text-image-horiz" :value text-image-horiz)
 		      (const :tag "System default" :value nil)) "24.1")
              (tool-bar-max-label-size frames integer "24.1")
-	     (auto-hscroll-mode scrolling boolean "21.1")
+	     (auto-hscroll-mode scrolling
+                                (choice
+		                 (const :tag "Off (nil)" :value nil)
+		                 (const :tag "On (t)" :value t)
+		                 (const :tag "Current line only" :value current-line))
+                                "26.1")
 	     (void-text-area-pointer cursor
 				     (choice
 				      (const :tag "Standard (text pointer)" :value nil)

Steve Berman