From 8732f0b53d8fd5eb28528dbd202eb8b930afbdbe Mon Sep 17 00:00:00 2001
From: Maciej Pasternacki <maciej@pasternacki.net>
Date: Wed, 22 Oct 2008 11:26:18 +0200
Subject: [PATCH] - use qualified package name

---
 src/common.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/common.lisp b/src/common.lisp
index 280d66e..319f2a3 100644
--- a/src/common.lisp
+++ b/src/common.lisp
@@ -64,7 +64,7 @@ Usually it will be a reader method automatically defined for ID column of a DAO.
 
 (defun update-dao-if-dirty (dao)
   (when (dirty-p dao)
-    (update-dao dao)
+    (postmodern:update-dao dao)
     (setf (dirty-p dao) nil)))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-- 
2.11.4.GIT