hgext/record.py

--- a/hgext/record.py	Thu Jul 25 02:17:52 2013 -0500
+++ b/hgext/record.py	Thu Jul 25 02:34:09 2013 -0500
@@ -519,6 +519,7 @@
         will be left in place, so the user can continue working.
         """
 
+        cmdutil.checkunfinished(repo, commit=True)
         merge = len(repo[None].parents()) > 1
         if merge:
             raise util.Abort(_('cannot partially commit a merge '