all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
From: Juri Linkov <juri@jurta.org>
To: storm@cua.dk (Kim F. Storm)
Cc: emacs-devel@gnu.org
Subject: Re: Alternative fringe bitmaps for continuation/truncation
Date: Sat, 03 May 2008 02:48:34 +0300	[thread overview]
Message-ID: <87d4o4qobd.fsf@jurta.org> (raw)
In-Reply-To: <87wsmjgrnq.fsf@kfs-lx.rd.rdm> (Kim F. Storm's message of "Sun, 27 Apr 2008 18:59:37 +0200")

> If you don't like the current "fat (curly) arrows" bitmaps used in the
> fringe for continuation and truncation lines, the following more
> modest bitmaps may be more appealing.
>
> (define-fringe-bitmap 'right-truncation
>   "\xa9\x02\x04" nil nil 'bottom)
> (define-fringe-bitmap 'left-truncation
>   "\x20\x40\xaa\0\0" nil nil 'bottom)
> (define-fringe-bitmap 'right-continuation
>   "\xa8\0\0" nil nil 'bottom)
> (define-fringe-bitmap 'left-continuation
>   "\x2a\0\0" nil nil 'bottom)
>
> (let ((tr (assoc 'truncation default-fringe-indicator-alist))
>       (co (assoc 'continuation default-fringe-indicator-alist)))
>   (if tr (setcdr tr '(left-truncation right-truncation)))
>   (if co (setcdr co '(left-continuation right-continuation))))
>
> WDYT?

For a long time I use the bitmaps defined here:
http://thread.gmane.org/gmane.emacs.devel/39264/focus=50919
and they are really nice.  Maybe we should add an option
to select them instead of the current default "fat" bitmaps?

-- 
Juri Linkov
http://www.jurta.org/emacs/




      parent reply	other threads:[~2008-05-02 23:48 UTC|newest]

Thread overview: 10+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2008-04-27 16:59 Alternative fringe bitmaps for continuation/truncation Kim F. Storm
2008-04-27 21:02 ` Jason Rumney
2008-04-28  4:03   ` Stefan Monnier
2008-04-28 10:18     ` Kim F. Storm
2008-04-28 10:53       ` Jason Rumney
2008-04-28 15:00       ` Stefan Monnier
2008-04-28 17:38         ` Kim F. Storm
2008-04-28 17:50           ` Jason Rumney
2008-04-28 22:01             ` Kim F. Storm
2008-05-02 23:48 ` Juri Linkov [this message]

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=87d4o4qobd.fsf@jurta.org \
    --to=juri@jurta.org \
    --cc=emacs-devel@gnu.org \
    --cc=storm@cua.dk \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.