record: check patch name is valid before prompting in qrecord

hgext/mq.py

@@ -892,6 +892,7 class queue(object):
         if date:
             date = util.parsedate(date)
         diffopts = self.diffopts({'git': opts.get('git')})
+        if opts.get('checkname', True):
         self.checkpatchname(patchfn)
         inclsubs = self.check_substate(repo)
         if inclsubs:

hgext/record.py

@@ -389,7 +389,10 def qrecord(ui, repo, patch, *pats, **op
     except KeyError:
         raise util.Abort(_("'mq' extension not loaded"))
 
+    repo.mq.checkpatchname(patch)
+
     def committomq(ui, repo, *pats, **opts):
+        opts['checkname'] = False
         mq.new(ui, repo, patch, *pats, **opts)
 
     dorecord(ui, repo, committomq, 'qnew', *pats, **opts)

tests/test-qrecord.t

@@ -219,6 +219,12 Whole diff
    someone
    up
 
+qrecord with bad patch name, should abort before prompting
+
+  $ hg qrecord .hg
+  abort: patch name cannot begin with ".hg"
+  [255]
+
 qrecord a.patch
 
   $ hg qrecord -d '0 0' -m aaa a.patch <<EOF