From 898a6e9fb3389d346b9fcf10387d20906cd024e6 Mon Sep 17 00:00:00 2001
From: Ulrich Müller <ulm@gentoo.org>
Date: Sun, 12 Oct 2008 19:42:42 +0000
Subject: Add function names to error messages.

svn path=/emacs-overlay/; revision=1169
---
 eclass/ChangeLog           |  4 ++++
 eclass/elisp-common.eclass | 13 ++++++-------
 2 files changed, 10 insertions(+), 7 deletions(-)

diff --git a/eclass/ChangeLog b/eclass/ChangeLog
index a67b94b..5def0ce 100644
--- a/eclass/ChangeLog
+++ b/eclass/ChangeLog
@@ -1,3 +1,7 @@
+2008-10-12  Ulrich Mueller  <ulm@gentoo.org>
+
+	* elisp-common.eclass: Add function names to error messages.
+
 2008-10-09  Ulrich Mueller  <ulm@gentoo.org>
 
 	* elisp-common.eclass (SITEETC): Document as eclass variable.
diff --git a/eclass/elisp-common.eclass b/eclass/elisp-common.eclass
index 347779a..acfbf58 100644
--- a/eclass/elisp-common.eclass
+++ b/eclass/elisp-common.eclass
@@ -174,7 +174,7 @@ BYTECOMPFLAGS="-L ."
 elisp-compile() {
 	ebegin "Compiling GNU Emacs Elisp files"
 	${EMACS} ${EMACSFLAGS} ${BYTECOMPFLAGS} -f batch-byte-compile "$@"
-	eend $? "batch-byte-compile failed"
+	eend $? "elisp-compile: batch-byte-compile failed"
 }
 
 # #FUNCTION: elisp-comp
@@ -219,8 +219,7 @@ elisp-comp() {
 	popd
 	rm -fr ${tempdir}
 
-	eend ${ret} "batch-byte-compile failed"
-	return ${ret}
+	eend ${ret} "elisp-comp: batch-byte-compile failed"
 }
 
 # @FUNCTION: elisp-emacs-version
@@ -266,7 +265,7 @@ elisp-make-autoload-file() {
 		--eval "(setq generated-autoload-file (expand-file-name \"${f}\"))" \
 		-f batch-update-autoloads "${@-.}"
 
-	eend $? "batch-update-autoloads failed"
+	eend $? "elisp-make-autoload-file: batch-update-autoloads failed"
 }
 
 # @FUNCTION: elisp-install
@@ -282,7 +281,7 @@ elisp-install() {
 		insinto "${SITELISP}/${subdir}"
 		doins "$@"
 	)
-	eend $? "doins failed"
+	eend $? "elisp-install: doins failed"
 }
 
 # @FUNCTION: elisp-site-file-install
@@ -302,7 +301,7 @@ elisp-site-file-install() {
 	)
 	ret=$?
 	rm -f "${sf}"
-	eend ${ret} "doins failed"
+	eend ${ret} "elisp-site-file-install: doins failed"
 }
 
 # @FUNCTION: elisp-site-regen
@@ -321,7 +320,7 @@ elisp-site-regen() {
 	local tmpdir=${T:-$(mktemp -d)}
 
 	if [ ! -d "${ROOT}${SITELISP}" ]; then
-		eerror "Directory ${SITELISP} does not exist"
+		eerror "elisp-site-regen: Directory ${SITELISP} does not exist"
 		return 1
 	fi
 
-- 
cgit v1.2.3-65-gdbad