From 3c3d5537681b1791d00416694ac808d77e027e40 Mon Sep 17 00:00:00 2001
From: Jonathan Bernard <jonathan_bernard@quantumdigital.com>
Date: Thu, 10 Mar 2011 16:00:46 -0600
Subject: [PATCH] Bugfix in ts_api:delete_entry/1, bad case clause ordering.

---
 src/ts_api.erl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/ts_api.erl b/src/ts_api.erl
index b7cc81d..f54027b 100644
--- a/src/ts_api.erl
+++ b/src/ts_api.erl
@@ -487,6 +487,8 @@ delete_entry(YArg, Username, TimelineId, EntryId) ->
     % find the record to delete
     case ts_entry:lookup(Username, TimelineId, EntryId) of
 
+        no_record -> make_json_404(YArg);
+
         Record ->
             % try to delete
             case ts_entry:delete(Record) of
@@ -494,9 +496,7 @@ delete_entry(YArg, Username, TimelineId, EntryId) ->
                 Error ->
                     io:format("Error occurred deleting entry record: ~p", [Error]),
                     make_json_500(YArg)
-            end;
-
-        no_record -> make_json_404(YArg)
+            end
     end.
 
 % ============================== %