org-macs: Fix last commit

* lisp/org-macs.el (org-parse-time-string): Fix typo in last commit.
* testing/lisp/test-org-element.el (test-org-element/timestamp):
  Rename to `test-org-element/timestamp-parser'.

lisp/org-macs.el

@@ -1110,10 +1110,10 @@ This should be a lot faster than the `parse-time-string'."
   (unless (string-match org-ts-regexp0 s)
     (error "Not an Org time string: %s" s))
   (list 0
-	(cond ((match-beginning 8) (string-to-number (match-string 8)))
+	(cond ((match-beginning 8) (string-to-number (match-string 8 s)))
 	      (nodefault nil)
 	      (t 0))
-	(cond ((match-beginning 7) (string-to-number (match-string 7)))
+	(cond ((match-beginning 7) (string-to-number (match-string 7 s)))
 	      (nodefault nil)
 	      (t 0))
 	(string-to-number (match-string 4 s))

testing/lisp/test-org-element.el

@@ -2402,7 +2402,7 @@ Outside list"
 
 ;;;; Timestamp
 
-(ert-deftest test-org-element/timestamp ()
+(ert-deftest test-org-element/timestamp-parser ()
   "Test `timestamp' parser."
   ;; Active timestamp.
   (should