# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1488571463 0
# Node ID d5445be606ffe94027a7a5555930cf8d8a1cf082
# Parent  a2ff64cc3ac9fc6d010e86ea17cc410d375bbc4d
Fix Qud dump script

diff -r a2ff64cc3ac9 -r d5445be606ff src/qud.lisp
--- a/src/qud.lisp	Wed Feb 15 10:23:50 2017 +0000
+++ b/src/qud.lisp	Fri Mar 03 20:04:23 2017 +0000
@@ -74,6 +74,7 @@
     (sort prices #'> :key #'first)))
 
 (defun dump ()
+  (build-object-index *objects*)
   (write-string-into-file
     (with-output-to-string (*standard-output*)
       (print-table (cons '(price/weight item-key display-name price weight)