[profile] / Makefile

## -*-makefile-*-

all:
.PHONY: all

clean::
.PHONY: clean

.SECONDEXPANSION: #sorry

###--------------------------------------------------------------------------
### Utilities.

##
quote			 = '$(subst ','\'',$1)'#'

## Suss out how to print stuff.
print			 = printf "%s" $(call quote,$1)

## Looking configuration things up.
mdw-conf		 = $(shell bin/mdw-conf "$1" "$2")

## Checking symlink targets.
symlink-ok-p		 = $(shell \
	case $$(readlink 2>/dev/null $1) in ($2) echo t ;; esac)

## Silent rules machinery.
V			 = 0
V_AT			 = $(V_AT_$V)
V_AT_0			 = @
v_print			 = $(call v_print_$V,$1,$2)
v_print_0		 = \
	printf "  %-8s %s\n" "$1" $(call quote,$(patsubst $(HOME)/%,~/%,$2));
v_tag			 = $(V_AT)$(call v_print_$V,$1,$@)

## Hack.
relax			 =

###--------------------------------------------------------------------------
### Configuration.

## Figure out where I am.
HERE			:= $(shell pwd)

## Decide on how to fetch things from URLs.
ifeq ($(shell (curl >/dev/null 2>&1 --version || [ $$? -eq 2 ]) && echo t),t)
  get-url		 = curl -fs -o $1 $2
else
  get-url		 = wget -q -O $1 $2
endif

## Which Emacs should I use?
EMACS			:= $(shell \
	emacs=nil; \
	for i in emacs24 emacs23 emacs22 emacs21 emacs; do \
	  if type >/dev/null 2>&1 $$i; then emacs=$$i; break; fi; \
	done; \
	echo $$emacs)

## Whence to obtain externally hosted stuff.
REPO			 = https://ftp.distorted.org.uk/u/mdw/profile

## Additional local configuration.
-include local.mk

###--------------------------------------------------------------------------
### Some utility rules.

_force:
.PHONY: _force

###--------------------------------------------------------------------------
### Emacs.

ifneq ($(EMACS),nil)

EMACSLIB		 = $(HOME)/lib/emacs

EMACS_VERSION		:= $(shell $(EMACS) 2>&1 -Q --batch --eval \
	'(message "%s %s" emacs-major-version emacs-minor-version)' | \
	tail -n1)
emacs-version-p		 = $(shell set -- $(EMACS_VERSION); \
	if [ $$1 -gt $1 ] || ([ $$1 -eq $1 ] && [ $$2 -ge $2 ]); then \
	  echo t; \
	fi)

ELISP			+= make-regexp ew-hols
ELISP			+= mdw-gnus-patch
ELISP			+= mdw-multiple-cursors
ELISP			+= git git-blame vc-git stgit quilt

ifeq ($(call emacs-version-p,24,3),t)
ELISP			+= bracketed-paste
endif

ELISP			+= dot-emacs
dot-emacs_DEPS		 = make-regexp

SCRIPTLINKS		+= emacsclient-hack movemail-hack sendmail-hack
SCRIPTLINKS		+= aspell-hack emerge-hack wakey.sh

%.elc: %.el $$(foreach e, $$($$*_DEPS), $$(DEP_$$e))
	$(call v_tag,EMACS)if ! $(EMACS) >$*.build-log 2>&1 \
		-L el/ -L $(EMACSLIB) \
		--batch --no-site-file \
		--eval '(byte-compile-file "$<")'; then \
	  cat $*.build-log; exit 2; \
	fi

LOCAL_ELISP		 = $(filter $(notdir $(wildcard el/*.el)), \
				$(addsuffix .el, $(ELISP)))
$(foreach e, $(LOCAL_ELISP), \
	$(eval DEP_$(basename $e) = $(EMACSLIB)/$(e:.el=.elc)))
$(addprefix $(EMACSLIB)/, $(LOCAL_ELISP)): $(EMACSLIB)/%: el/%
	$(call v_tag,SYMINK)mkdir -p $(EMACSLIB) && \
		rm -f $@.new && \
		ln -s $(HERE)/$< $@.new && \
		mv $@.new $@

REMOTE_ELISP		 = $(filter-out $(notdir $(wildcard el/*.el)), \
				$(addsuffix .el, $(ELISP)))
$(foreach e, $(REMOTE_ELISP), \
	$(eval DEP_$(basename $e) = $(if $(shell \
		if $(EMACS) >/dev/null 2>&1 --no-site-file -q --batch \
			--eval ' \
			  (progn \
			    (kill-emacs (condition-case nil \
					    (progn (load-library "$e") 0) \
					  (error 1))))'; then \
		  echo t; \
		fi),, $(EMACSLIB)/$(e:.el=.elc))))
$(addprefix $(EMACSLIB)/, $(REMOTE_ELISP)): $(EMACSLIB)/%:
	$(call v_tag,FETCH)mkdir -p $(EMACSLIB) && \
		$(call get-url,$@.new,$(REPO)/$*) && \
		mv $@.new $@

DOTLINKS		+= .emacs .emacs-calc .vm .gnus.el .ercrc.el

all: $(foreach e, $(ELISP), $(DEP_$e))
$(foreach e, $(ELISP), $(eval _emacs.$e: $(EMACSLIB)/$e.elc))

endif

###--------------------------------------------------------------------------
### Other simpler things.

$(HOME)/.mdw.conf:
	$(call v_tag,COPY)cp mdw.conf $@.new && mv $@.new $@

## Utility packages.
PACKAGES		+= mlib checkpath
mlib_CHECK		 = crc-mktab
checkpath_CHECK		 = tmpdir
checkpath_DEPS		 = mlib

## Packaging machinery.
SCRIPTLINKS		+= mdw-build mdw-sbuild mdw-sbuild-server
SCRIPTLINKS		+= update-buildable-branch
DOTLINKS		+= .config/mdw-build.conf
.config/mdw-build.conf_SRC = mdw-build.conf

## Shells.
DOTLINKS		+= .profile .shell-rc .shell-logout
DOTLINKS		+= .shrc
DOTLINKS		+= .zprofile .zshrc .zlogout .zshenv
DOTLINKS		+= .bash_profile .bash_completion .bash_logout
DOTLINKS		+= .bashrc .inputrc
.bash_profile_SRC	 = bash-profile
.bash_completion_SRC	 = bash-completion
.bash_logout_SRC	 = shell-logout
.zlogout_SRC		 = shell-logout

all: zap-stale-zcompdump
zap-stale-zcompdump:
	$(V_AT)if [ $(HOME)/.zcompdump -ot dot/zshrc ]; then \
	  $(call v_print,ZAP,$(HOME)/.zcompdump)rm -f $(HOME)/.zcompdump; \
	fi
.PHONY: zap-stale-zcompdump

## The Plan 9 `rc' shell.  This needs special hacking, because the Linux port
## and Plan 9 From User Space have incompatible syntax.
DOTLINKS		+= lib/profile
lib/profile_SRC		 = rcrc
all: $(HOME)/.rcrc
$(HOME)/.rcrc: dot/rcrc
	$(call v_tag,SED)sed 's/; if not/else/' $< >$@.new && mv $@.new $@

## Git.
DOTSUBST		+= .gitconfig
SCRIPTLINKS		+= git-copyright-dates
DOTLINKS		+= .cgrc .tigrc
.gitconfig_SUBSTS	 = \
	$(call substvar,releasekey,$(call mdw-conf,releasekey,481334C2)) \
	$(call substvar,email,$(call mdw-conf,email,mdw@distorted.org.uk))
$(HOME)/.gitconfig: $(HOME)/.mdw.conf

## PulseAudio.
DOTLINKS		+= .pulse/daemon.conf
DOTSUBST		+= .pulse/default.pa
.pulse/daemon.conf_SRC	 = pulse-daemon.conf
.pulse/default.pa_SRC	 = pulse-default.pa.in

## Other editors.
DOTLINKS		+= .vimrc .mg .zile

## Mail.
DOTLINKS		+= .mailrc .signature .muttrc

## Lisp.
DOTLINKS		+= .cmucl-init.lisp .sbclrc .clisprc.lisp
DOTLINKS		+= .eclrc .ccl-init.lisp .abclrc
.cmucl-init.lisp_SRC	 = lisp-init.lisp
.sbclrc_SRC		 = lisp-init.lisp
.clisprc.lisp_SRC	 = lisp-init.lisp
.eclrc_SRC		 = lisp-init.lisp
.ccl-init.lisp_SRC	 = lisp-init.lisp
.abclrc_SRC		 = lisp-init.lisp
DOTLINKS		+= .swank.lisp

## IPython.
DOTLINKS		+= .ipython/profile_default/ipython_config.py
DOTLINKS		+= .ipython/profile_default/startup/50-key-bindings.py
.ipython/profile_default/ipython_config.py_SRC = ipython-config.py
.ipython/profile_default/startup/50-key-bindings.py_SRC = ipython-key-bindings.py

## Other languages.
DOTLINKS		+= .guile
DOTLINKS		+= .tclshrc .wishrc
.tclshrc_SRC		 = tclshrc
.wishrc_SRC		 = tclshrc

## The `nocss' machinery.
SCRIPTLINKS		+= nocss
all: $(HOME)/lib/hacks/nocss/libdvdcss.so.2
$(HOME)/lib/hacks/nocss/libdvdcss.so.2:
	$(V_AT)mkdir -p $(dir $@)
	$(call v_tag,TOUCH)touch $@

## Random scripts.
SCRIPTLINKS		+= mdw-editor mdw-pager
SCRIPTLINKS		+= mdw-conf
SCRIPTLINKS		+= svnwrap
SCRIPTLINKS		+= guest-console
SCRIPTLINKS		+= hyperspec
SCRIPTLINKS		+= bdl
SCRIPTLINKS		+= datasyms
SCRIPTLINKS		+= fixsub
SCRIPTLINKS		+= check-debsyms
SCRIPTLINKS		+= check-blkdev-size
SCRIPTLINKS		+= xremote
SCRIPTLINKS		+= remote-disorder
SCRIPTLINKS		+= remote-slideshow

## Random odds and ends.
DOTLINKS		+= .infokey .sqliterc
DOTLINKS		+= .gdbinit .toprc .aspell.conf
DOTLINKS		+= .dircolors .colordiffrc .screenrc .tmux.conf
DOTLINKS		+= .cvsrc .indent.pro .ditz-config
DOTLINKS		+= .lftp/rc
.lftp/rc_SRC		 = lftp-rc
DOTLINKS		+= .a2ps/a2psrc
.a2ps/a2psrc_SRC	 = a2psrc
DOTSUBST		+= .mykermrc
SCRIPTLINKS		+= lesspipe.sh

SCRIPTLINKS		+= run-with-shell-env
SCRIPTLINKS		+= start-ssh-agent start-ssh-pageant
SCRIPTLINKS		+= add-ssh-keys
SCRIPTLINKS		+= hacks/ssh/ssh
hacks/ssh/ssh_SRC	 = hacks/ssh

DOTLINKS		+= .w3m/config .elinks/elinks.conf
.w3m/config_SRC		 = w3m-config
.elinks/elinks.conf_SRC	 = elinks.conf

DOTLINKS		+= .mc/ini .mc/panels.ini
.mc/ini_SRC		 = mc-ini
.mc/panels.ini_SRC	 = mc-panels.ini

DOTLINKS		+= .parallel/config .parallel/sshloginfile
.parallel/config_SRC	 = parallel-config
.parallel/sshloginfile_SRC = parallel-hosts

all: $(HOME)/.less
$(HOME)/.less: dot/lesskey
	$(V_AT)rm -f $(HOME)/.lesskey
	$(call v_tag,LESSKEY)lesskey -o$@ $<

###--------------------------------------------------------------------------
### X11 configuration.

ifeq ($X,t)

PACKAGES		+= xtoys
xtoys_CHECK		 = xatom
xtoys_DEPS		 = mlib

DOTLINKS		+= .xinitrc .xsession .xmodmap .vncrc .vncsession
DOTLINKS		+= .config/fontconfig/fonts.conf
.config/fontconfig/fonts.conf_SRC = fonts.conf
DOTLINKS		+= .stalonetrayrc

DOTLINKS		+= .config/gnome-session/sessions/mdw.session
.config/gnome-session/sessions/mdw.session_SRC = mdw.session

DOTLINKS		+= .Eterm/themes/Eterm/theme.cfg
DOTLINKS		+= .enlightenment/keybindings.cfg
DOTLINKS		+= .enlightenment-vnc/keybindings.cfg
DOTLINKS		+= .e16/bindings.cfg
.Eterm/themes/Eterm/theme.cfg_SRC = eterm-theme.cfg
.enlightenment/keybindings.cfg_SRC = e-keybindings.cfg
.enlightenment-vnc/keybindings.cfg_SRC = evnc-keybindings.cfg
.e16/bindings.cfg_SRC	 = e16-bindings

DOTLINKS		+= .gtkrc-2.0
DOTLINKS		+= .config/gtk-3.0/gtk.css
DOTLINKS		+= .config/gtk-3.0/settings.ini
.config/gtk-3.0/gtk.css_SRC = gtk3.css
.config/gtk-3.0/settings.ini_SRC = gtk3-settings.ini

DOTLINKS		+= .config/user-dirs.dirs .config/user-dirs.locale
.config/user-dirs.dirs_SRC = user-dirs.dirs
.config/user-dirs.locale_SRC = user-dirs.locale

SCRIPTLINKS		+= xinitcmd lock-screen xshutdown
SCRIPTLINKS		+= un-backslashify-selection
SCRIPTLINKS		+= xpra-start-xdummy
SCRIPTLINKS		+= play-rawk
SCRIPTLINKS		+= x2x-privsep
SCRIPTLINKS		+= xduplic-terminal

DOTCPP			+= .Xdefaults
Xdefaults_DEFS		 = -DEMACSWD=$(call mdw-conf,emacs-width,77)
$(HOME)/.Xdefaults: $(HOME)/.mdw.conf dot/Xdefaults.pterm

ifeq ($(shell case $${DISPLAY-nil} in (:[0-9]*) echo t ;; (*) echo nil ;; esac),t)
dotfile-hook/.Xdefaults = \
	$(call v_tag,XRDB)xrdb -load $<
endif

endif

###--------------------------------------------------------------------------
### Firefox things.

ifeq ($(FIREFOX),t)

out/:
	$(call v_tag,MKDIR)mkdir $@

out/firefox/: | out/
	$(call v_tag,MKDIR)mkdir $@

clean::; rm -rf out/

all: out/firefox/smartup-gestures.config
out/firefox/smartup-gestures.config: firefox/smartup-gestures.json | out/firefox/
	$(call v_tag,BLOB)\
		jq -c . $< | bincode base64 >$@.new && mv $@.new $@

all: out/firefox/stylus.json
out/firefox/stylus.json: firefox/stylus/ firefox/stylus/*.css | out/firefox/
	$(call v_tag,IMPLODE)\
		firefox/implode-stylus firefox/stylus/ >$@.new && \
			mv $@.new $@
endif

###--------------------------------------------------------------------------
### General symlinking.

misclink-source		 = $(HERE)/$(or $($1_SRC), $1)

all: $(addprefix $(HOME)/, $(MISCLINKS))
misclink-ok-p		 = \
	$(call symlink-ok-p,$(HOME)/$1,$(call misclink-source,$1))
$(addprefix $(HOME)/, $(subst %,\%,$(MISCLINKS))): $(HOME)/%: \
		$$(if $$(call misclink-ok-p,$$*),,_force)
	$(call v_tag,SYMLINK)mkdir -p $(dir $@) && \
		rm -f $@.new && \
		ln -s $(call misclink-source,$*) $@.new && \
		mv $@.new $@
	$(symlink-hook/$*)

###--------------------------------------------------------------------------
### Processing dotfiles.

dotfile-source		 = $(HERE)/dot/$(or $($1_SRC), $(1:.%=%)$2)

## Easiest: just make symlinks.
dotlink-ok-p		 = \
	$(call symlink-ok-p,$(HOME)/$1,$(call dotfile-source,$1))
all: $(addprefix $(HOME)/, $(DOTLINKS))
$(addprefix $(HOME)/, $(subst %,\%,$(DOTLINKS))): $(HOME)/%: \
		$$(if $$(call dotlink-ok-p,$$*),,_force)
	$(call v_tag,SYMLINK)mkdir -p $(dir $@) && \
		rm -f $@.new && \
		ln -s $(call dotfile-source,$*) $@.new && \
		mv $@.new $@
	$(dotfile-hook/$*)

## Hack with the C preprocessor.
all: $(addprefix $(HOME)/, $(DOTCPP))
$(addprefix $(HOME)/, $(subst %,\%,$(DOTCPP))): $(HOME)/%: \
		$$(call dotfile-source,$$*) Makefile
	$(call v_tag,CPP)mkdir -p $(dir $@) && \
		rm -f $@.new && \
		cpp -P -o$@.new $($*_DEFS) $< && \
		mv $@.new $@
	$(dotfile-hook/$*)

## Hack by making simple substitutions.
substvar		 = -e $(call quote,s\a@$1@\a$2\ag)
SUBSTS			+= $(call substvar,home,$(HOME))
SUBSTS			+= $(call substvar,profile,$(HERE))
all: $(addprefix $(HOME)/, $(DOTSUBST))
$(addprefix $(HOME)/, $(subst %,\%,$(DOTSUBST))): $(HOME)/%: \
		$$(call dotfile-source,$$*,.in) Makefile
	$(call v_tag,SUBST)mkdir -p $(dir $@) && \
		rm -f $@.new && \
		sed -e "1i\
$(relax)### generated by $(HERE)/Makefile; do not edit!" \
			$(SUBSTS) $($*_SUBSTS) \
			$(call dotfile-source,$*,.in) >$@.new && \
		mv $@.new $@
	$(dotfile-hook/$*)

###--------------------------------------------------------------------------
### Processing script links.

script-source		 = $(HERE)/bin/$(or $($1_SRC), $1)

ifeq ($(prefix-shebang-p),t)
all: $(addprefix $(HOME)/bin/, $(SCRIPTLINKS))
$(addprefix $(HOME)/bin/, $(SCRIPTLINKS)): $(HOME)/bin/%: \
		$$(call script-source,$$*) Makefile
	$(call v_tag,SHEBANG)mkdir -p $(dir $@) && \
		rm -f $@.new && \
		sed "1s\a\(#! *\)/\a\1$(SHEBANG_PREFIX)/\a" \
			$(call script-source,$*) >$@.new && \
		chmod --reference=$(call script-source,$*) $@.new && \
		mv $@.new $@
	$(script-hook/$*)
else
scriptlink-ok-p		 = \
	$(call symlink-ok-p,$(HOME)/bin/$1,$(call script-source,$1))
all: $(addprefix $(HOME)/bin/, $(SCRIPTLINKS))
$(addprefix $(HOME)/bin/, $(SCRIPTLINKS)): $(HOME)/bin/%: \
		$$(if $$(call scriptlink-ok-p,$$*),,_force)
	$(call v_tag,SYMLINK)mkdir -p $(dir $@) && \
		rm -f $@.new && \
		ln -s $(call script-source,$*) $@.new && \
		mv $@.new $@
	$(script-hook/$*)
endif

all: $(addprefix $(HOME)/bin/, $(SCRIPTLINKS))

###--------------------------------------------------------------------------
### Building packages from source tarballs.

SRCDIR			 = $(HOME)/src/profile

pkg-builddir		 = $(SRCDIR)/$1/build
pkg-stamp		 = $(call pkg-builddir,$1)/$2-stamp

$(foreach p, $(PACKAGES), $(eval DEP_$p = $(if $(shell \
	if $($p_CHECK) >/dev/null 2>&1 --version; then echo t; fi),, \
	$(call pkg-stamp,$p,install))))

$(PACKAGES:%=$(SRCDIR)/%.tar.gz): $(SRCDIR)/%.tar.gz:
	$(call v_tag,FETCH)mkdir -p $(SRCDIR) && \
		rm -f $@.new && \
		$(call get-url,$@.new,$(REPO)/$*.tar.gz) && \
		mv $@.new $@

$(foreach p, $(PACKAGES), $(call pkg-stamp,$p,unpack)): \
		$(call pkg-stamp,%,unpack): $(SRCDIR)/%.tar.gz
	$(call v_tag,EXTRACT)rm -rf $(SRCDIR)/$* && \
		mkdir $(SRCDIR)/$*.tmp-unpack && \
		cd $(SRCDIR)/$*.tmp-unpack && \
		gzip -cd ../$*.tar.gz | tar xf - && \
		mv * ../$* && \
		cd .. && \
		rmdir $*.tmp-unpack && \
		mkdir $*/build && \
		touch $*/build/unpack-stamp

$(foreach p, $(PACKAGES), $(call pkg-stamp,$p,configure)): \
		$(call pkg-stamp,%,configure): \
		$(call pkg-stamp,%,unpack) \
		$$(foreach p, $$($$*_DEPS), $$(DEP_$$p))
	$(call v_tag,CONFIG)cd $(dir $@) && \
		../configure --prefix=$(HOME) \
			PKG_CONFIG_PATH=$(HOME)/lib/pkgconfig \
			$($*_CONFIG) >>buildlog 2>&1 && \
		touch configure-stamp

$(foreach p, $(PACKAGES), $(call pkg-stamp,$p,build)): \
		$(call pkg-stamp,%,build): \
		$(call pkg-stamp,%,configure)
	$(call v_tag,BUILD)cd $(dir $@) && \
		$(MAKE) $($*_MAKEFLAGS) >>buildlog 2>&1 && \
		touch build-stamp

$(foreach p, $(PACKAGES), $(call pkg-stamp,$p,install)): \
		$(call pkg-stamp,%,install): \
		$(call pkg-stamp,%,build)
	$(call v_tag,INSTALL)cd $(dir $@) && \
		$(MAKE) $($*_MAKEFLAGS) install >>buildlog 2>&1 && \
		touch install-stamp
	$(package-hook/$*)

all: $(foreach p, $(PACKAGES), $(DEP_$p))
$(foreach p, $(PACKAGES), $(eval _pkg.$p: $(call pkg-stamp,$p,install)))

###----- That's all, folks --------------------------------------------------
Commit	Line	Data
67b1a15a MW	1	## --makefile--
67b1a15a MW	2
807c317e	3	all:
5e776d3c MW	4	.PHONY: all
	5
	6	clean::
	7	.PHONY: clean
	8
67b1a15a MW	9	.SECONDEXPANSION: #sorry
	10
	11	###--------------------------------------------------------------------------
	12	### Utilities.
	13
	14	##
	15	quote = '$(subst ','\'',$1)'#'
	16
	17	## Suss out how to print stuff.
	18	print = printf "%s" $(call quote,$1)
	19
	20	## Looking configuration things up.
	21	mdw-conf = $(shell bin/mdw-conf "$1" "$2")
	22
	23	## Checking symlink targets.
	24	symlink-ok-p = $(shell \
	25	case $$(readlink 2>/dev/null $1) in ($2) echo t ;; esac)
	26
	27	## Silent rules machinery.
	28	V = 0
67b1a15a MW	29	V_AT = $(V_AT_$V)
67b1a15a MW	30	V_AT_0 = @
2e0a8012	31	v_print = $(call v_print_$V,$1,$2)
a811ce27 MW	32	v_print_0 = \
a811ce27 MW	33	printf " %-8s %s\n" "$1" $(call quote,$(patsubst $(HOME)/%,~/%,$2));
2e0a8012	34	v_tag = $(V_AT)$(call v_print_$V,$1,$@)
67b1a15a MW	35
	36	## Hack.
	37	relax =
	38
	39	###--------------------------------------------------------------------------
	40	### Configuration.
	41
	42	## Figure out where I am.
3337f511	43	HERE := $(shell pwd)
67b1a15a MW	44
	45	## Decide on how to fetch things from URLs.
	46	ifeq ($(shell (curl >/dev/null 2>&1 --version \|\| [ $$? -eq 2 ]) && echo t),t)
	47	get-url = curl -fs -o $1 $2
	48	else
	49	get-url = wget -q -O $1 $2
	50	endif
	51
	52	## Which Emacs should I use?
	53	EMACS := $(shell \
	54	emacs=nil; \
	55	for i in emacs24 emacs23 emacs22 emacs21 emacs; do \
3337f511 MW	56	if type >/dev/null 2>&1 $$i; then emacs=$$i; break; fi; \
	57	done; \
	58	echo $$emacs)
67b1a15a MW	59
	60	## Whence to obtain externally hosted stuff.
	61	REPO = https://ftp.distorted.org.uk/u/mdw/profile
	62
	63	## Additional local configuration.
	64	-include local.mk
	65
	66	###--------------------------------------------------------------------------
	67	### Some utility rules.
	68
	69	_force:
	70	.PHONY: _force
	71
	72	###--------------------------------------------------------------------------
	73	### Emacs.
	74
967148ff MW	75	ifneq ($(EMACS),nil)
967148ff MW	76
67b1a15a MW	77	EMACSLIB = $(HOME)/lib/emacs
67b1a15a MW	78
486623cb	79	EMACS_VERSION := $(shell $(EMACS) 2>&1 -Q --batch --eval \
b2f6f110 MW	80	'(message "%s %s" emacs-major-version emacs-minor-version)' \| \
b2f6f110 MW	81	tail -n1)
486623cb MW	82	emacs-version-p = $(shell set -- $(EMACS_VERSION); \
	83	if [ $$1 -gt $1 ] \|\| ([ $$1 -eq $1 ] && [ $$2 -ge $2 ]); then \
	84	echo t; \
	85	fi)
	86
6369ae29 MW	87	ELISP += make-regexp ew-hols
	88	ELISP += mdw-gnus-patch
	89	ELISP += mdw-multiple-cursors
	90	ELISP += git git-blame vc-git stgit quilt
486623cb MW	91
486623cb MW	92	ifeq ($(call emacs-version-p,24,3),t)
6369ae29	93	ELISP += bracketed-paste
486623cb	94	endif
67b1a15a	95
3e441da6 MW	96	ELISP += dot-emacs
	97	dot-emacs_DEPS = make-regexp
	98
67b1a15a	99	SCRIPTLINKS += emacsclient-hack movemail-hack sendmail-hack
cef9886f	100	SCRIPTLINKS += aspell-hack emerge-hack wakey.sh
67b1a15a	101
3e441da6	102	%.elc: %.el $$(foreach e, $$($$*_DEPS), $$(DEP_$$e))
83198952 MW	103	$(call v_tag,EMACS)if ! $(EMACS) >$*.build-log 2>&1 \
83198952 MW	104	-L el/ -L $(EMACSLIB) \
67b1a15a	105	--batch --no-site-file \
83198952 MW	106	--eval '(byte-compile-file "$<")'; then \
	107	cat $*.build-log; exit 2; \
	108	fi
67b1a15a	109
6369ae29 MW	110	LOCAL_ELISP = $(filter $(notdir $(wildcard el/*.el)), \
	111	$(addsuffix .el, $(ELISP)))
	112	$(foreach e, $(LOCAL_ELISP), \
	113	$(eval DEP_$(basename $e) = $(EMACSLIB)/$(e:.el=.elc)))
67b1a15a MW	114	$(addprefix $(EMACSLIB)/, $(LOCAL_ELISP)): $(EMACSLIB)/%: el/%
	115	$(call v_tag,SYMINK)mkdir -p $(EMACSLIB) && \
	116	rm -f $@.new && \
	117	ln -s $(HERE)/$< $@.new && \
	118	mv $@.new $@
	119
	120	REMOTE_ELISP = $(filter-out $(notdir $(wildcard el/*.el)), \
6369ae29	121	$(addsuffix .el, $(ELISP)))
67b1a15a	122	$(foreach e, $(REMOTE_ELISP), \
6369ae29	123	$(eval DEP_$(basename $e) = $(if $(shell \
67b1a15a MW	124	if $(EMACS) >/dev/null 2>&1 --no-site-file -q --batch \
	125	--eval ' \
	126	(progn \
	127	(kill-emacs (condition-case nil \
	128	(progn (load-library "$e") 0) \
	129	(error 1))))'; then \
	130	echo t; \
	131	fi),, $(EMACSLIB)/$(e:.el=.elc))))
	132	$(addprefix $(EMACSLIB)/, $(REMOTE_ELISP)): $(EMACSLIB)/%:
	133	$(call v_tag,FETCH)mkdir -p $(EMACSLIB) && \
	134	$(call get-url,$@.new,$(REPO)/$*) && \
	135	mv $@.new $@
	136
	137	DOTLINKS += .emacs .emacs-calc .vm .gnus.el .ercrc.el
	138
807c317e	139	all: $(foreach e, $(ELISP), $(DEP_$e))
6369ae29	140	$(foreach e, $(ELISP), $(eval _emacs.$e: $(EMACSLIB)/$e.elc))
67b1a15a	141
967148ff MW	142	endif
967148ff MW	143
67b1a15a MW	144	###--------------------------------------------------------------------------
	145	### Other simpler things.
	146
	147	$(HOME)/.mdw.conf:
	148	$(call v_tag,COPY)cp mdw.conf $@.new && mv $@.new $@
	149
	150	## Utility packages.
	151	PACKAGES += mlib checkpath
	152	mlib_CHECK = crc-mktab
	153	checkpath_CHECK = tmpdir
	154	checkpath_DEPS = mlib
	155
	156	## Packaging machinery.
	157	SCRIPTLINKS += mdw-build mdw-sbuild mdw-sbuild-server
	158	SCRIPTLINKS += update-buildable-branch
f0637893 MW	159	DOTLINKS += .config/mdw-build.conf
f0637893 MW	160	.config/mdw-build.conf_SRC = mdw-build.conf
67b1a15a MW	161
	162	## Shells.
	163	DOTLINKS += .profile .shell-rc .shell-logout
a3857ab2	164	DOTLINKS += .shrc
9ba9bb2f MW	165	DOTLINKS += .zprofile .zshrc .zlogout .zshenv
	166	DOTLINKS += .bash_profile .bash_completion .bash_logout
	167	DOTLINKS += .bashrc .inputrc
67b1a15a MW	168	.bash_profile_SRC = bash-profile
67b1a15a MW	169	.bash_completion_SRC = bash-completion
9ba9bb2f MW	170	.bash_logout_SRC = shell-logout
9ba9bb2f MW	171	.zlogout_SRC = shell-logout
67b1a15a	172
807c317e MW	173	all: zap-stale-zcompdump
807c317e MW	174	zap-stale-zcompdump:
72123a3a MW	175	$(V_AT)if [ $(HOME)/.zcompdump -ot dot/zshrc ]; then \
	176	$(call v_print,ZAP,$(HOME)/.zcompdump)rm -f $(HOME)/.zcompdump; \
	177	fi
807c317e	178	.PHONY: zap-stale-zcompdump
72123a3a	179
a3857ab2 MW	180	## The Plan 9 `rc' shell. This needs special hacking, because the Linux port
	181	## and Plan 9 From User Space have incompatible syntax.
	182	DOTLINKS += lib/profile
	183	lib/profile_SRC = rcrc
807c317e	184	all: $(HOME)/.rcrc
a3857ab2 MW	185	$(HOME)/.rcrc: dot/rcrc
	186	$(call v_tag,SED)sed 's/; if not/else/' $< >$@.new && mv $@.new $@
	187
67b1a15a MW	188	## Git.
67b1a15a MW	189	DOTSUBST += .gitconfig
2e15741e	190	SCRIPTLINKS += git-copyright-dates
67b1a15a MW	191	DOTLINKS += .cgrc .tigrc
67b1a15a MW	192	.gitconfig_SUBSTS = \
9ca6d190 MW	193	$(call substvar,releasekey,$(call mdw-conf,releasekey,481334C2)) \
9ca6d190 MW	194	$(call substvar,email,$(call mdw-conf,email,mdw@distorted.org.uk))
67b1a15a MW	195	$(HOME)/.gitconfig: $(HOME)/.mdw.conf
	196
	197	## PulseAudio.
	198	DOTLINKS += .pulse/daemon.conf
	199	DOTSUBST += .pulse/default.pa
	200	.pulse/daemon.conf_SRC = pulse-daemon.conf
	201	.pulse/default.pa_SRC = pulse-default.pa.in
	202
	203	## Other editors.
	204	DOTLINKS += .vimrc .mg .zile
	205
	206	## Mail.
	207	DOTLINKS += .mailrc .signature .muttrc
	208
	209	## Lisp.
6a8c8070 MW	210	DOTLINKS += .cmucl-init.lisp .sbclrc .clisprc.lisp
6a8c8070 MW	211	DOTLINKS += .eclrc .ccl-init.lisp .abclrc
67b1a15a MW	212	.cmucl-init.lisp_SRC = lisp-init.lisp
	213	.sbclrc_SRC = lisp-init.lisp
	214	.clisprc.lisp_SRC = lisp-init.lisp
	215	.eclrc_SRC = lisp-init.lisp
6a8c8070 MW	216	.ccl-init.lisp_SRC = lisp-init.lisp
6a8c8070 MW	217	.abclrc_SRC = lisp-init.lisp
67b1a15a MW	218	DOTLINKS += .swank.lisp
	219
	220	## IPython.
	221	DOTLINKS += .ipython/profile_default/ipython_config.py
	222	DOTLINKS += .ipython/profile_default/startup/50-key-bindings.py
	223	.ipython/profile_default/ipython_config.py_SRC = ipython-config.py
	224	.ipython/profile_default/startup/50-key-bindings.py_SRC = ipython-key-bindings.py
	225
	226	## Other languages.
	227	DOTLINKS += .guile
	228	DOTLINKS += .tclshrc .wishrc
	229	.tclshrc_SRC = tclshrc
	230	.wishrc_SRC = tclshrc
	231
bc61033e MW	232	## The `nocss' machinery.
	233	SCRIPTLINKS += nocss
	234	all: $(HOME)/lib/hacks/nocss/libdvdcss.so.2
	235	$(HOME)/lib/hacks/nocss/libdvdcss.so.2:
	236	$(V_AT)mkdir -p $(dir $@)
	237	$(call v_tag,TOUCH)touch $@
	238
67b1a15a MW	239	## Random scripts.
	240	SCRIPTLINKS += mdw-editor mdw-pager
	241	SCRIPTLINKS += mdw-conf
	242	SCRIPTLINKS += svnwrap
	243	SCRIPTLINKS += guest-console
	244	SCRIPTLINKS += hyperspec
310d0527	245	SCRIPTLINKS += bdl
878a38bd	246	SCRIPTLINKS += datasyms
8945a62f	247	SCRIPTLINKS += fixsub
01a5d0a6	248	SCRIPTLINKS += check-debsyms
a98bca79	249	SCRIPTLINKS += check-blkdev-size
a10bf242 MW	250	SCRIPTLINKS += xremote
	251	SCRIPTLINKS += remote-disorder
	252	SCRIPTLINKS += remote-slideshow
67b1a15a MW	253
67b1a15a MW	254	## Random odds and ends.
3f7369a9	255	DOTLINKS += .infokey .sqliterc
67b1a15a MW	256	DOTLINKS += .gdbinit .toprc .aspell.conf
	257	DOTLINKS += .dircolors .colordiffrc .screenrc .tmux.conf
	258	DOTLINKS += .cvsrc .indent.pro .ditz-config
da526ba7 MW	259	DOTLINKS += .lftp/rc
da526ba7 MW	260	.lftp/rc_SRC = lftp-rc
dd794b20 MW	261	DOTLINKS += .a2ps/a2psrc
dd794b20 MW	262	.a2ps/a2psrc_SRC = a2psrc
67b1a15a MW	263	DOTSUBST += .mykermrc
	264	SCRIPTLINKS += lesspipe.sh
	265
	266	SCRIPTLINKS += run-with-shell-env
	267	SCRIPTLINKS += start-ssh-agent start-ssh-pageant
	268	SCRIPTLINKS += add-ssh-keys
	269	SCRIPTLINKS += hacks/ssh/ssh
	270	hacks/ssh/ssh_SRC = hacks/ssh
	271
	272	DOTLINKS += .w3m/config .elinks/elinks.conf
	273	.w3m/config_SRC = w3m-config
	274	.elinks/elinks.conf_SRC = elinks.conf
	275
	276	DOTLINKS += .mc/ini .mc/panels.ini
	277	.mc/ini_SRC = mc-ini
	278	.mc/panels.ini_SRC = mc-panels.ini
	279
e8f132bd	280	DOTLINKS += .parallel/config .parallel/sshloginfile
67b1a15a	281	.parallel/config_SRC = parallel-config
e8f132bd	282	.parallel/sshloginfile_SRC = parallel-hosts
67b1a15a	283
807c317e	284	all: $(HOME)/.less
3f7369a9 MW	285	$(HOME)/.less: dot/lesskey
	286	$(V_AT)rm -f $(HOME)/.lesskey
	287	$(call v_tag,LESSKEY)lesskey -o$@ $<
	288
67b1a15a MW	289	###--------------------------------------------------------------------------
	290	### X11 configuration.
	291
	292	ifeq ($X,t)
	293
	294	PACKAGES += xtoys
	295	xtoys_CHECK = xatom
	296	xtoys_DEPS = mlib
	297
	298	DOTLINKS += .xinitrc .xsession .xmodmap .vncrc .vncsession
df4bcc77 MW	299	DOTLINKS += .config/fontconfig/fonts.conf
df4bcc77 MW	300	.config/fontconfig/fonts.conf_SRC = fonts.conf
67b1a15a MW	301	DOTLINKS += .stalonetrayrc
67b1a15a MW	302
67b1a15a MW	303	DOTLINKS += .config/gnome-session/sessions/mdw.session
	304	.config/gnome-session/sessions/mdw.session_SRC = mdw.session
	305
	306	DOTLINKS += .Eterm/themes/Eterm/theme.cfg
	307	DOTLINKS += .enlightenment/keybindings.cfg
	308	DOTLINKS += .enlightenment-vnc/keybindings.cfg
	309	DOTLINKS += .e16/bindings.cfg
	310	.Eterm/themes/Eterm/theme.cfg_SRC = eterm-theme.cfg
	311	.enlightenment/keybindings.cfg_SRC = e-keybindings.cfg
	312	.enlightenment-vnc/keybindings.cfg_SRC = evnc-keybindings.cfg
	313	.e16/bindings.cfg_SRC = e16-bindings
	314
	315	DOTLINKS += .gtkrc-2.0
	316	DOTLINKS += .config/gtk-3.0/gtk.css
	317	DOTLINKS += .config/gtk-3.0/settings.ini
	318	.config/gtk-3.0/gtk.css_SRC = gtk3.css
	319	.config/gtk-3.0/settings.ini_SRC = gtk3-settings.ini
	320
a9d5edbf MW	321	DOTLINKS += .config/user-dirs.dirs .config/user-dirs.locale
	322	.config/user-dirs.dirs_SRC = user-dirs.dirs
	323	.config/user-dirs.locale_SRC = user-dirs.locale
	324
67b1a15a MW	325	SCRIPTLINKS += xinitcmd lock-screen xshutdown
	326	SCRIPTLINKS += un-backslashify-selection
	327	SCRIPTLINKS += xpra-start-xdummy
5f9b345a	328	SCRIPTLINKS += play-rawk
75a2ccd4	329	SCRIPTLINKS += x2x-privsep
b3ee0533	330	SCRIPTLINKS += xduplic-terminal
67b1a15a MW	331
	332	DOTCPP += .Xdefaults
	333	Xdefaults_DEFS = -DEMACSWD=$(call mdw-conf,emacs-width,77)
57a9b0cd	334	$(HOME)/.Xdefaults: $(HOME)/.mdw.conf dot/Xdefaults.pterm
67b1a15a	335
ddc97f65 MW	336	ifeq ($(shell case $${DISPLAY-nil} in (:[0-9]) echo t ;; () echo nil ;; esac),t)
ddc97f65 MW	337	dotfile-hook/.Xdefaults = \
8baf0354	338	$(call v_tag,XRDB)xrdb -load $<
ddc97f65 MW	339	endif
ddc97f65 MW	340
67b1a15a MW	341	endif
67b1a15a MW	342
53ad55a5 MW	343	###--------------------------------------------------------------------------
	344	### Firefox things.
	345
	346	ifeq ($(FIREFOX),t)
	347
	348	out/:
	349	$(call v_tag,MKDIR)mkdir $@
	350
	351	out/firefox/: \| out/
	352	$(call v_tag,MKDIR)mkdir $@
	353
	354	clean::; rm -rf out/
	355
807c317e	356	all: out/firefox/smartup-gestures.config
53ad55a5 MW	357	out/firefox/smartup-gestures.config: firefox/smartup-gestures.json \| out/firefox/
	358	$(call v_tag,BLOB)\
	359	jq -c . $< \| bincode base64 >$@.new && mv $@.new $@
	360
807c317e	361	all: out/firefox/stylus.json
53ad55a5 MW	362	out/firefox/stylus.json: firefox/stylus/ firefox/stylus/*.css \| out/firefox/
	363	$(call v_tag,IMPLODE)\
	364	firefox/implode-stylus firefox/stylus/ >$@.new && \
	365	mv $@.new $@
	366	endif
	367
9c72b1b3 MW	368	###--------------------------------------------------------------------------
	369	### General symlinking.
	370
	371	misclink-source = $(HERE)/$(or $($1_SRC), $1)
	372
807c317e	373	all: $(addprefix $(HOME)/, $(MISCLINKS))
9c72b1b3 MW	374	misclink-ok-p = \
	375	$(call symlink-ok-p,$(HOME)/$1,$(call misclink-source,$1))
	376	$(addprefix $(HOME)/, $(subst %,\%,$(MISCLINKS))): $(HOME)/%: \
	377	$$(if $$(call misclink-ok-p,$$*),,_force)
	378	$(call v_tag,SYMLINK)mkdir -p $(dir $@) && \
	379	rm -f $@.new && \
	380	ln -s $(call misclink-source,$*) $@.new && \
	381	mv $@.new $@
	382	$(symlink-hook/$*)
	383
67b1a15a MW	384	###--------------------------------------------------------------------------
	385	### Processing dotfiles.
	386
	387	dotfile-source = $(HERE)/dot/$(or $($1_SRC), $(1:.%=%)$2)
	388
4937ba2d	389	## Easiest: just make symlinks.
67b1a15a MW	390	dotlink-ok-p = \
67b1a15a MW	391	$(call symlink-ok-p,$(HOME)/$1,$(call dotfile-source,$1))
807c317e	392	all: $(addprefix $(HOME)/, $(DOTLINKS))
67b1a15a MW	393	$(addprefix $(HOME)/, $(subst %,\%,$(DOTLINKS))): $(HOME)/%: \
	394	$$(if $$(call dotlink-ok-p,$$*),,_force)
	395	$(call v_tag,SYMLINK)mkdir -p $(dir $@) && \
	396	rm -f $@.new && \
	397	ln -s $(call dotfile-source,$*) $@.new && \
	398	mv $@.new $@
f6c3a80b	399	$(dotfile-hook/$*)
67b1a15a MW	400
67b1a15a MW	401	## Hack with the C preprocessor.
807c317e	402	all: $(addprefix $(HOME)/, $(DOTCPP))
67b1a15a MW	403	$(addprefix $(HOME)/, $(subst %,\%,$(DOTCPP))): $(HOME)/%: \
	404	$$(call dotfile-source,$$*) Makefile
	405	$(call v_tag,CPP)mkdir -p $(dir $@) && \
	406	rm -f $@.new && \
	407	cpp -P -o$@.new $($*_DEFS) $< && \
	408	mv $@.new $@
f6c3a80b	409	$(dotfile-hook/$*)
67b1a15a MW	410
	411	## Hack by making simple substitutions.
	412	substvar = -e $(call quote,s\a@$1@\a$2\ag)
	413	SUBSTS += $(call substvar,home,$(HOME))
	414	SUBSTS += $(call substvar,profile,$(HERE))
807c317e	415	all: $(addprefix $(HOME)/, $(DOTSUBST))
67b1a15a	416	$(addprefix $(HOME)/, $(subst %,\%,$(DOTSUBST))): $(HOME)/%: \
33271a96	417	$$(call dotfile-source,$$*,.in) Makefile
67b1a15a MW	418	$(call v_tag,SUBST)mkdir -p $(dir $@) && \
	419	rm -f $@.new && \
	420	sed -e "1i\
	421	$(relax)### generated by $(HERE)/Makefile; do not edit!" \
	422	$(SUBSTS) $($*_SUBSTS) \
	423	$(call dotfile-source,$*,.in) >$@.new && \
	424	mv $@.new $@
f6c3a80b	425	$(dotfile-hook/$*)
67b1a15a MW	426
	427	###--------------------------------------------------------------------------
	428	### Processing script links.
	429
	430	script-source = $(HERE)/bin/$(or $($1_SRC), $1)
0cd3b798 MW	431
0cd3b798 MW	432	ifeq ($(prefix-shebang-p),t)
807c317e	433	all: $(addprefix $(HOME)/bin/, $(SCRIPTLINKS))
0cd3b798 MW	434	$(addprefix $(HOME)/bin/, $(SCRIPTLINKS)): $(HOME)/bin/%: \
	435	$$(call script-source,$$*) Makefile
	436	$(call v_tag,SHEBANG)mkdir -p $(dir $@) && \
	437	rm -f $@.new && \
	438	sed "1s\a\(#! *\)/\a\1$(SHEBANG_PREFIX)/\a" \
	439	$(call script-source,$*) >$@.new && \
	440	chmod --reference=$(call script-source,$*) $@.new && \
	441	mv $@.new $@
	442	$(script-hook/$*)
	443	else
67b1a15a MW	444	scriptlink-ok-p = \
67b1a15a MW	445	$(call symlink-ok-p,$(HOME)/bin/$1,$(call script-source,$1))
807c317e	446	all: $(addprefix $(HOME)/bin/, $(SCRIPTLINKS))
67b1a15a MW	447	$(addprefix $(HOME)/bin/, $(SCRIPTLINKS)): $(HOME)/bin/%: \
	448	$$(if $$(call scriptlink-ok-p,$$*),,_force)
	449	$(call v_tag,SYMLINK)mkdir -p $(dir $@) && \
	450	rm -f $@.new && \
	451	ln -s $(call script-source,$*) $@.new && \
	452	mv $@.new $@
f6c3a80b	453	$(script-hook/$*)
0cd3b798	454	endif
67b1a15a	455
807c317e	456	all: $(addprefix $(HOME)/bin/, $(SCRIPTLINKS))
67b1a15a MW	457
	458	###--------------------------------------------------------------------------
	459	### Building packages from source tarballs.
	460
	461	SRCDIR = $(HOME)/src/profile
	462
	463	pkg-builddir = $(SRCDIR)/$1/build
	464	pkg-stamp = $(call pkg-builddir,$1)/$2-stamp
	465
	466	$(foreach p, $(PACKAGES), $(eval DEP_$p = $(if $(shell \
	467	if $($p_CHECK) >/dev/null 2>&1 --version; then echo t; fi),, \
	468	$(call pkg-stamp,$p,install))))
	469
	470	$(PACKAGES:%=$(SRCDIR)/%.tar.gz): $(SRCDIR)/%.tar.gz:
	471	$(call v_tag,FETCH)mkdir -p $(SRCDIR) && \
	472	rm -f $@.new && \
	473	$(call get-url,$@.new,$(REPO)/$*.tar.gz) && \
	474	mv $@.new $@
	475
	476	$(foreach p, $(PACKAGES), $(call pkg-stamp,$p,unpack)): \
	477	$(call pkg-stamp,%,unpack): $(SRCDIR)/%.tar.gz
	478	$(call v_tag,EXTRACT)rm -rf $(SRCDIR)/$* && \
	479	mkdir $(SRCDIR)/$*.tmp-unpack && \
	480	cd $(SRCDIR)/$*.tmp-unpack && \
	481	gzip -cd ../$*.tar.gz \| tar xf - && \
	482	mv * ../$* && \
	483	cd .. && \
	484	rmdir $*.tmp-unpack && \
	485	mkdir $*/build && \
	486	touch $*/build/unpack-stamp
	487
	488	$(foreach p, $(PACKAGES), $(call pkg-stamp,$p,configure)): \
	489	$(call pkg-stamp,%,configure): \
	490	$(call pkg-stamp,%,unpack) \
	491	$$(foreach p, $$($$*_DEPS), $$(DEP_$$p))
	492	$(call v_tag,CONFIG)cd $(dir $@) && \
	493	../configure --prefix=$(HOME) \
	494	PKG_CONFIG_PATH=$(HOME)/lib/pkgconfig \
	495	$($*_CONFIG) >>buildlog 2>&1 && \
	496	touch configure-stamp
	497
	498	$(foreach p, $(PACKAGES), $(call pkg-stamp,$p,build)): \
	499	$(call pkg-stamp,%,build): \
	500	$(call pkg-stamp,%,configure)
	501	$(call v_tag,BUILD)cd $(dir $@) && \
	502	$(MAKE) $($*_MAKEFLAGS) >>buildlog 2>&1 && \
	503	touch build-stamp
	504
	505	$(foreach p, $(PACKAGES), $(call pkg-stamp,$p,install)): \
	506	$(call pkg-stamp,%,install): \
	507	$(call pkg-stamp,%,build)
	508	$(call v_tag,INSTALL)cd $(dir $@) && \
	509	$(MAKE) $($*_MAKEFLAGS) install >>buildlog 2>&1 && \
	510	touch install-stamp
f6c3a80b	511	$(package-hook/$*)
67b1a15a	512
807c317e	513	all: $(foreach p, $(PACKAGES), $(DEP_$p))
67b1a15a MW	514	$(foreach p, $(PACKAGES), $(eval _pkg.$p: $(call pkg-stamp,$p,install)))
	515
	516	###----- That's all, folks --------------------------------------------------