view msdos/sed6.inp @ 106239:0ac473df1bd1

Provide additional default values (file name at point or at the current Dired line) via M-n for file reading minibuffers. (Bug#5010) * minibuffer.el (read-file-name-defaults): New function. (read-file-name): Reset `minibuffer-default' to nil when it duplicates initial input `insdef'. Bind `minibuffer-default-add-function' to lambda that calls `read-file-name-defaults' in `minibuffer-selected-window'. (minibuffer-insert-file-name-at-point): New command. * files.el (file-name-at-point-functions): New defcustom. (find-file-default): Remove defvar. (find-file-read-args): Don't use `find-file-default'. Move `minibuffer-with-setup-hook' that sets `minibuffer-default' to `read-file-name'. (find-file-literally): Use `read-file-name' with `confirm-nonexistent-file-or-buffer'. * ffap.el (ffap-guess-file-name-at-point): New autoloaded function. * dired.el (dired-read-dir-and-switches): Move `minibuffer-with-setup-hook' that sets `minibuffer-default' to `read-file-name'. (dired-file-name-at-point): New function. (dired-mode): Add hook `dired-file-name-at-point' to `file-name-at-point-functions'.

# -sed6.inp------------------------------------------------------------------
# Configuration script for doc/emacs/Makefile, doc/lispref/Makefile,
# doc/lispintro/Makefile, and doc/misc/Makefile under DJGPP v2.x
# ---------------------------------------------------------------------------
#
# Copyright (C) 1997, 2000, 2001, 2002, 2003, 2004,
#   2005, 2006, 2007, 2008, 2009 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'
}
/^maintainer-clean:/,/^$/ {
  s/^	for file in $(INFO_TARGETS)\; do rm -f.*$/	rm -f $(INFO_TARGETS)/
}

# arch-tag: defe1001-f35a-47f7-9635-3f5d33ee5e97