Mercurial > emacs
view msdos/sed6.inp @ 57258:36eef73e00fa
(Vfringe_bitmaps): New variable.
(syms_of_fringe): DEFVAR_LISP it.
(valid_fringe_bitmap_p): Rename from valid_fringe_bitmap_id_p.
Change arg to Lisp_Object and fail if not an integer.
(get_fringe_bitmap_name, resolve_fringe_bitmap)
(destroy_fringe_bitmap): New functions.
(Fdestroy_fringe_bitmap): Change arg to bitmap symbol. Use
destroy_fringe_bitmap. Remove symbol from Vfringe_bitmaps and
clear its fringe property.
(init_fringe_bitmap): Use destroy_fringe_bitmap instead of
Fdestroy_fringe_bitmap.
(Fdefine_fringe_bitmap): Add BITMAP arg specifying new or existing
bitmap symbol; remove WHICH arg. Add symbol to Vfringe_bitmaps
and set fringe property. Signal error if no free slots.
(Fset_fringe_bitmap_face): Change arg to bitmap symbol.
(Ffringe_bitmaps_at_pos): Return bitmap symbols instead of numbers.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Tue, 28 Sep 2004 23:02:53 +0000 |
parents | 695cf19ef79e |
children | 3723093a21fd 375f2633d815 |
line wrap: on
line source
# -sed6.inp------------------------------------------------------------------ # Configuration script for man/Makefile, lispref/Makefile, and # lispintro/Makefile under DJGPP v2.x # --------------------------------------------------------------------------- # # Copyright (C) 1997, 2000, 2001 # Free Software Foundation, Inc. # # This file is part of GNU Emacs. # # This file is free software; as a special exception, the author gives # unlimited permission to copy and/or distribute it, with or without # modifications, as long as this notice is preserved. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. # # ---------------------------------------------------------------------- /^srcdir *=/s/@[^@\n]*@/./ /^VPATH *=/s/@[^@\n]*@/./ /^ENVADD/c\ ENVADD =\ export TEXINPUTS := $(srcdir)";"$(TEXINPUTS)\ export MAKEINFO := $(MAKEINFO) -I$(srcdir) /^texinputdir/c\ texinputdir =\ export texinputdir := $(srcdir)";"$(TEXINPUTS) /^SHELL *=/s/^/# / /^elisp.dvi:/,/^$/ { /^ *if \[ *\a${permuted_index}/,/^ *fi *$/c\ command.com /c 'if not a${permuted_index}==a sh ./permute-index' \ command.com /c 'if not a${permuted_index}==a mv permuted.fns elisp.fns' \ command.com /c 'if not a${permuted_index}==a texindex elisp.tp' \ command.com /c 'if a${permuted_index}==a texindex elisp.??' } /^index.texi:/,/^$/ { /^ *if \[ *\a${permuted_index}/,/^ *fi *$/c\ command.com /c 'if not a${permuted_index}==a cp -p ./index.perm index.texi' \ command.com /c 'if a${permuted_index}==a cp -p ./index.unperm index.texi' } # arch-tag: defe1001-f35a-47f7-9635-3f5d33ee5e97