#!/bin/sh

# attempt to repair damage from earlier versions of this package

l1='(if (file-exists-p "/usr/lib/emacs/site-lisp/w3-init.el") (load "w3-init"))'
etc=/etc/site-start.el
emacs=/usr/lib/emacs/site-lisp/site-start.el

if [ -f $etc -a -f $emacs ]
then
	echo "w3-el: damaged link detected: $emacs -/-> $etc"
	if diff $etc $emacs
	then
		echo "w3-el: Replacing damaged link: $emacs -> $etc"
		rm $emacs
		ln -s $etc $emacs
	else
		if diff $etc $emacs | grep '^[<>] ' | grep -v "$l1" | grep .
		then
			echo "Warning: can't repair damaged link: $emacs -> $etc"
			exit 1
		else
			echo "w3-el: Replacing damaged link: $emacs -> $etc"
			rm $emacs
			ln -s $etc $emacs
		fi
	fi
fi
