Commits

Anonymous committed 85aff5b Merge

Backout branch merge.

Comments (0)

Files changed (1)

 
 (defun get-request-action-name ()
   "Gets the name of the action from the request."
-  (request-parameter *action-string*))
+  (let* ((request-action-name (request-parameter *action-string*))
+	 (get/post-action-name (parameter *action-string*))
+	 (action-name (or request-action-name get/post-action-name)))
+    action-name))
 
 (defvar *ignore-missing-actions* t)