* admin/unidata/uvs.el (uvs-print-table-ivd): Fix free variable typo.

[bpt/emacs.git] / admin / unidata / uvs.el

diff --git a/admin/unidata/uvs.el b/admin/unidata/uvs.el
index 7559a56..4a17c72 100644 (file)
--- a/admin/unidata/uvs.el
+++ b/admin/unidata/uvs.el
@@ -198,8 +198,8 @@ corresponding number."
   (let ((uvs-alist
         (with-temp-buffer
           (insert-file-contents filename)
-          (setq uvs-alist (uvs-alist-from-ivd collection-id
-                                              sequence-id-to-glyph-func)))))
+          (uvs-alist-from-ivd collection-id
+                              sequence-id-to-glyph-func))))
     (princ "/* Automatically generated by uvs.el.  */\n")
     (princ
      (format "static const unsigned char mac_uvs_table_%s_bytes[] =\n  {\n"