From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Stefan Monnier Newsgroups: gmane.emacs.help Subject: Re: How to get normal cursor in text mode? Date: Mon, 31 Oct 2005 23:22:40 -0500 Organization: Bell Sympatico Message-ID: <87sluh2e31.fsf-monnier+gnu.emacs.help@gnu.org> References: NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1130819201 14285 80.91.229.2 (1 Nov 2005 04:26:41 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Tue, 1 Nov 2005 04:26:41 +0000 (UTC) Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Tue Nov 01 05:26:40 2005 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1EWni6-0007rt-Iu for geh-help-gnu-emacs@m.gmane.org; Tue, 01 Nov 2005 05:25:22 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1EWni5-0003A9-TJ for geh-help-gnu-emacs@m.gmane.org; Mon, 31 Oct 2005 23:25:21 -0500 Original-Newsgroups: gnu.emacs.help User-Agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux) Cancel-Lock: sha1:/dPC45xVD0f7Ah7s2uVYzEz0SHQ= Original-Lines: 57 Original-NNTP-Posting-Host: 70.48.82.56 Original-X-Complaints-To: abuse@sympatico.ca Original-X-Trace: news20.bellglobal.com 1130818967 70.48.82.56 (Mon, 31 Oct 2005 23:22:47 EST) Original-NNTP-Posting-Date: Mon, 31 Oct 2005 23:22:47 EST Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!postnews.google.com!news3.google.com!news.glorb.com!news.louisville.edu!tor-nx1!webster!nf1.bellglobal.com!nf2.bellglobal.com!news20.bellglobal.com.POSTED!not-for-mail Original-Xref: shelby.stanford.edu gnu.emacs.help:135137 Original-To: help-gnu-emacs@gnu.org X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.help:30728 Archived-At: >> From some time emacs turn on ugly big block cursor in text mode on > Linux console. This cursor is very distracting, making emacs almost > unusable. Facts: > - most other editors just use normal cursor > - I _can_ stop emacs using block cursor by telling emacs that it > is running on vt100 > - the Cursor customization group seem to contain options about X > Is there a way to tell emacs to use normal cursor? IFAICS emacs > is actively working to turn block cursor on, so it must contain > somewhere special code to do this. Indeed. Try the patch below. If it works for you, please report your problem via M-x report-emacs-bug. Stefan --- orig/src/term.c +++ mod/src/term.c @@ -275,7 +275,7 @@ char *TS_termcap_modes; /* "ti" */ char *TS_visible_bell; /* "vb" */ char *TS_cursor_normal; /* "ve" */ -char *TS_cursor_visible; /* "vs" */ +char *TS_cursor_very_visible; /* "vs" */ char *TS_cursor_invisible; /* "vi" */ char *TS_set_window; /* "wi" (4 params, start and end of window, each as vpos and hpos) */ @@ -460,7 +460,7 @@ putchar ('\n'); } - OUTPUT_IF (TS_cursor_visible); + OUTPUT_IF (TS_cursor_normal); /* TS_cursor_very_visible */ OUTPUT_IF (TS_keypad_mode); losecursor (); } @@ -615,7 +615,7 @@ { tty_cursor_hidden = 0; OUTPUT_IF (TS_cursor_normal); - OUTPUT_IF (TS_cursor_visible); + /* OUTPUT_IF (TS_cursor_very_visible); */ } } @@ -2416,7 +2416,7 @@ Up = tgetstr ("up", address); TS_visible_bell = tgetstr ("vb", address); TS_cursor_normal = tgetstr ("ve", address); - TS_cursor_visible = tgetstr ("vs", address); + TS_cursor_very_visible = tgetstr ("vs", address); TS_cursor_invisible = tgetstr ("vi", address); TS_set_window = tgetstr ("wi", address);