Fix e03e837

* lisp/org-src.el (org-src-font-lock-fontify-block): Fix typos and
  silence byte-compiler.

lisp/org-src.el

@@ -513,8 +513,8 @@ as `org-src-fontify-natively' is non-nil."
 		   org-buffer)))
 	      (setq pos next))))
 	;; Add Org faces.
-	(let ((src-face (cadr (assoc-ignore-case lang org-src-block-faces))))
-          (when (or (facep src-face) (listp))
+	(let ((src-face (cadr (assoc-string lang org-src-block-faces))))
+          (when (or (facep src-face) (listp src-face))
             (font-lock-append-text-property start end 'face src-face))
 	  (font-lock-append-text-property start end 'face 'org-block))
 	(add-text-properties