[Emacs-diffs] trunk r115043: * admin/unidata/unidata-gen.el (unidata-gen-files):

[Glenn Morris]

------------------------------------------------------------
revno: 115043
revision-id: address@hidden
parent: address@hidden
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Fri 2013-11-08 19:12:56 -0500
message:
  * admin/unidata/unidata-gen.el (unidata-gen-files):
  Fix deletion of existing output files after 2013-10-30 changes.
modified:
  admin/ChangeLog                changelog-20091113204419-o5vbwnq5f7feedwu-2226
  admin/unidata/unidata-gen.el   
unidatagen.el-20091113204419-o5vbwnq5f7feedwu-8382

=== modified file 'admin/ChangeLog'
--- a/admin/ChangeLog   2013-11-07 07:57:35 +0000
+++ b/admin/ChangeLog   2013-11-09 00:12:56 +0000
@@ -1,3 +1,8 @@
+2013-11-09  Glenn Morris  <address@hidden>
+
+       * unidata/unidata-gen.el (unidata-gen-files):
+       Fix deletion of existing output files after 2013-10-30 changes.
+
 2013-11-07  Glenn Morris  <address@hidden>
 
        * unidata/unidata-gen.el (unidata-gen-files):

=== modified file 'admin/unidata/unidata-gen.el'
--- a/admin/unidata/unidata-gen.el      2013-11-07 07:57:35 +0000
+++ b/admin/unidata/unidata-gen.el      2013-11-09 00:12:56 +0000
@@ -1196,7 +1196,7 @@
        (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)