Mercurial > emacs
annotate mkinstalldirs @ 53180:a0409e91c835
(Vdisplay_pixels_per_inch): New variable.
(Vshow_text_cursor_in_void): New variable.
(glyph_to_pixel_coords): Don't use negative hpos.
(x_y_to_hpos_vpos): Fix for partially visible first glyph.
(append_stretch_glyph): Change ascent arg to be actual value
in pixels rather than ratio to height. Callers changed.
(calc_pixel_width_or_height): New aux function, implementing
pixel based artihmetic for glyph widths and heights.
(produce_stretch_glyph): Use calc_pixel_width_or_height for
:width, :height, :align-to, and :ascent, thus allowing these to
be specified in pixels as well as multiples of characters.
Don't produce stretch glyphs with zero width or height.
(get_specified_cursor_type): Declare static.
(get_window_cursor_type): Declare static. Add glyph arg to be
able to know when cursor is on an image; always substitute
hollow-box cursor for filled-box cursor on images, to avoid
negative images and flicker when blinking the cursor.
(display_and_set_cursor): Pass glyph to get_window_cursor_type.
(note_mode_line_or_margin_highlight): Use non-text cursor rather
than vertical scroll-bar cursor in display margins.
(note_mouse_highlight): Use non-text cursor rather than text
cursor in fringes and over images in the text area.
Use non-text cursor when mouse pointer is outside editable text,
i.e. in the void after end-of-line or end-of-buffer; this was
already done for W32, but is now standard for all systems --
user can toggle show-text-cursor-in-void to get old behaviour.
(syms_of_xdisp): DEFVAR_LISP Vshow_text_cursor_in_void and
Vdisplay_pixels_per_inch.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Thu, 27 Nov 2003 21:17:23 +0000 |
parents | 774df19dd335 |
children | f0eb34e60705 746c40973d25 |
rev | line source |
---|---|
25880 | 1 #! /bin/sh |
2 # mkinstalldirs --- make directory hierarchy | |
3 # Author: Noah Friedman <friedman@prep.ai.mit.edu> | |
4 # Created: 1993-05-16 | |
5 # Public domain | |
6 | |
35853
774df19dd335
(errstatus): Chmod a+rx directories we create.
Gerd Moellmann <gerd@gnu.org>
parents:
25880
diff
changeset
|
7 # $Id: mkinstalldirs,v 1.1 2001/02/02 13:04:53 gerd Exp $ |
25880 | 8 |
9 errstatus=0 | |
10 | |
11 for file | |
12 do | |
13 set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'` | |
14 shift | |
15 | |
16 pathcomp= | |
17 for d | |
18 do | |
19 pathcomp="$pathcomp$d" | |
20 case "$pathcomp" in | |
21 -* ) pathcomp=./$pathcomp ;; | |
22 esac | |
23 | |
24 if test ! -d "$pathcomp"; then | |
25 echo "mkdir $pathcomp" 1>&2 | |
26 | |
35853
774df19dd335
(errstatus): Chmod a+rx directories we create.
Gerd Moellmann <gerd@gnu.org>
parents:
25880
diff
changeset
|
27 (mkdir "$pathcomp" && chmod a+rx "$pathcomp") || lasterr=$? |
25880 | 28 |
29 if test ! -d "$pathcomp"; then | |
30 errstatus=$lasterr | |
31 fi | |
32 fi | |
33 | |
34 pathcomp="$pathcomp/" | |
35 done | |
36 done | |
37 | |
38 exit $errstatus | |
39 | |
40 # mkinstalldirs ends here |