GNU bug report logs - #1169
23.0.60; (substitute-command-keys "\\{...}") adds extra newline

Previous Next

Full log

View this message in rfc822 format

From: Juanma Barranquero <lekktu <at> gmail.com>
To: Lars Magne Ingebrigtsen <larsi <at> gnus.org>
Cc: Drew Adams <drew.adams <at> oracle.com>, 1169 <at> debbugs.gnu.org
Subject: bug#1169: 23.0.60; (substitute-command-keys "\\{...}") adds extra newline
Date: Thu, 7 Jul 2011 22:06:35 +0200

On Thu, Jul 7, 2011 at 19:32, Lars Magne Ingebrigtsen <larsi <at> gnus.org> wrote:

> I know what they do, but is there any point in actually inserting
> something as visually distracting as ^L into the buffer people are
> looking at?
>
> If one, for instance, just made the ^L invisible, it'd look nicer, and
> there would be minimal code change.

(defface page-break
  '((t :strike-through t))
  "Face to make page breaks more visible.")

(define-minor-mode page-break-mode
    "Toggle Page Break mode.

This is a global minor mode: all buffers which don't have an
overriding window or buffer display-table will be affected."
  :init-value nil
  :global t
  (aset (or standard-display-table
            (setq standard-display-table (make-display-table)))
        ?\^L
        (and page-break-mode
             (or (get 'page-break-mode :glyph-vector)
                 (put 'page-break-mode :glyph-vector
                      (make-vector 78 (make-glyph-code ?\s 'page-break)))))))

    Juanma

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.