From 8d4b7e91f727e6817212fd70045c3d29575d8bb1 Mon Sep 17 00:00:00 2001 From: Peter Bex Date: Fri, 27 Sep 2013 08:04:45 -0400 Subject: Improve error codes given when no egg name or release name is given, or when it couldn't be found: it's a client error, not a server error --- pseudo-meta-egg-info.scm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/pseudo-meta-egg-info.scm b/pseudo-meta-egg-info.scm index 5d7336f..d1ff8d8 100644 --- a/pseudo-meta-egg-info.scm +++ b/pseudo-meta-egg-info.scm @@ -45,8 +45,8 @@ (newline port))) releases) (close-output-port port)))) - (send-status 500 (sprintf "Egg \"~A\" doesn't exist or has no tags dir" egg-name)))) - (send-status 500 "No egg name given"))) + (send-status 404 (sprintf "Egg \"~A\" doesn't exist or has no tags dir" egg-name)))) + (send-status 400 "No egg name given"))) (define (files-list continue) (or (and-let* ((params (uri-query (request-uri (current-request)))) @@ -75,8 +75,8 @@ (newline port))) files) (close-output-port port)))) - (send-status 500 + (send-status 404 (sprintf "Release \"~A\" for egg \"~A\" doesn't exist" egg-release egg-name)))) - (send-status 500 "No egg name or release given"))) + (send-status 400 "No egg name or release given"))) ) -- cgit v1.2.3