diff --git a/lisp/org-list.el b/lisp/org-list.el
index 9dbdc9718..22d42a7ae 100644
--- a/lisp/org-list.el
+++ b/lisp/org-list.el
@@ -3076,10 +3076,12 @@ for this list."
   (catch 'exit
     (unless (org-at-item-p) (error "Not at a list item"))
     (save-excursion
-      (re-search-backward "#\\+ORGLST" nil t)
-      (unless (looking-at "\\(?:[ \t]\\)?#\\+ORGLST:[ \t]+SEND[ \t]+\\(\\S-+\\)[ \t]+\\(\\S-+\\)")
-	(if maybe (throw 'exit nil)
-	  (error "Don't know how to transform this list"))))
+      (let ((case-fold-search t))
+	(re-search-backward "^[ \t]*#\\+ORGLST:" nil t)
+	(unless (looking-at
+		 "[ \t]*#\\+ORGLST:[ \t]+SEND[ \t]+\\(\\S-+\\)[ \t]+\\([^ \t\n]+\\)")
+	  (if maybe (throw 'exit nil)
+	    (error "Don't know how to transform this list")))))
     (let* ((name (match-string 1))
 	   (transform (intern (match-string 2)))
 	   (bottom-point
diff --git a/lisp/org-table.el b/lisp/org-table.el
index 433b4ed09..c57eb5d33 100644
--- a/lisp/org-table.el
+++ b/lisp/org-table.el
@@ -4402,7 +4402,7 @@ to execute outside of tables."
 				     [(shift tab)] [(tab)] "\C-i"))
     (org-defkey orgtbl-mode-map [backspace]
 		(orgtbl-make-binding 'org-delete-backward-char 109
-				     [backspace] [(del)]))
+				     [backspace] (kbd "DEL")))
 
     (unless (featurep 'xemacs)
       (org-defkey orgtbl-mode-map [S-iso-lefttab]