Commits

Greg Slepak  committed 456eaa0

DB.OBJ:save returns list of saved differences instead of true on success

  • Participants
  • Parent commits a839a8a

Comments (0)

Files changed (1)

File example-site/dragonfly-framework/plugins-inactive/db/database_orm.lsp

 	(DB.OBJ:refetch)
 )
 
-; returns true on successful update, 0 if no update was needed, or nil if update failed
+; returns list of saved differences on successful update, 0 if no update was needed, or nil if update failed
 (define (DB.OBJ:save , diff)
 	(if (null? (setf diff (difference change-set revert-set)))
 		0
 		(when (db:execute-update (format DBOBJ_UPDATE_SQL table (join (map first diff) "=?,") finder) (map last diff))
 			(set 'revert-set change-set 'dirty nil)
-			true
+			diff
 		)
 	)
 )