* admin/unidata/unidata-gen.el (unidata-gen-files):

Fix deletion of existing output files after 2013-10-30 changes.

2 files changed, 6 insertions, 1 deletions

diff --git a/admin/ChangeLog b/admin/ChangeLog
index 40848069b55..1b4c50bcdde 100644
--- a/admin/ChangeLog
+++ b/admin/ChangeLog
@@ -1,3 +1,8 @@
+2013-11-09  Glenn Morris  <rgm@gnu.org>
+
+        * unidata/unidata-gen.el (unidata-gen-files):
+        Fix deletion of existing output files after 2013-10-30 changes.
+
 2013-11-07  Glenn Morris  <rgm@gnu.org>
 
         * unidata/unidata-gen.el (unidata-gen-files):
diff --git a/admin/unidata/unidata-gen.el b/admin/unidata/unidata-gen.el
index 3a05dbd4ca9..2e2eebe2c90 100644
--- a/admin/unidata/unidata-gen.el
+++ b/admin/unidata/unidata-gen.el
@@ -1196,7 +1196,7 @@ is the character itself.")))
         (unidata-dir data-dir))
     (dolist (elt unidata-prop-alist)
       (let* ((prop (car elt))
-             (file (unidata-prop-file prop)))
+             (file (expand-file-name (unidata-prop-file prop) dest-dir)))
         (if (file-exists-p file)
             (delete-file file))))
     (unidata-setup-list unidata-text-file)