org-xhtml.el: Minor fix

* contrib/lisp/org-xhtml.el (org-xhtml-begin-environment)
(org-xhtml-end-environment): Fix param list.

Continue commit 2e0e462d1460f4a4e55e180a4f090c5db7ca63af.

Support for annotation blocks for xhtml backend still needs to
be ported.  See org-exp-blocks.el for more information.

contrib/lisp/org-lparse.el

@@ -245,7 +245,8 @@ OPT-PLIST is the export options list."
 	;; The link protocol has a function for format the link
 	(setq rpl
 	      (save-match-data
-		(funcall fnc (org-link-unescape path) desc1 'html))))
+		(funcall fnc (org-link-unescape path)
+			 desc1 org-lparse-backend))))
 
        ((string= type "file")
 	;; FILE link

contrib/lisp/org-xhtml.el

@@ -1403,10 +1403,10 @@ lang=\"%s\" xml:lang=\"%s\">
        (END (org-lparse-begin-paragraph))))
     (t (error "Unknown environment %s" style))))
 
-(defun org-xhtml-begin-environment (style)
+(defun org-xhtml-begin-environment (style env-options-plist)
   (org-xhtml-format-environment style 'BEGIN))
 
-(defun org-xhtml-end-environment (style)
+(defun org-xhtml-end-environment (style env-options-plist)
   (org-xhtml-format-environment style 'END))
 
 (defun org-xhtml-begin-list (ltype)