From 7937bd84a588d63d7eaef813cf2f6cd5a41c5cf0 Mon Sep 17 00:00:00 2001
From: Rusty Klophaus <rklophaus@gmail.com>
Date: Wed, 3 Aug 2011 14:35:17 -0400
Subject: [PATCH] Fix bug introduced in commit 658a0a2, causing an undefined
 dispatch_list. Detect undefined dispatch list in code, and use empty list by
 default.

---
 src/webmachine_router.erl | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/src/webmachine_router.erl b/src/webmachine_router.erl
index 8f692f57..e6aef840 100644
--- a/src/webmachine_router.erl
+++ b/src/webmachine_router.erl
@@ -139,8 +139,12 @@ filter_by_resource({_, _, _}, _Resource) ->
     true.
 
 get_dispatch_list() ->
-    {ok, Dispatch} = application:get_env(webmachine, dispatch_list),
-    Dispatch.
+    case application:get_env(webmachine, dispatch_list) of
+        {ok, Dispatch} ->
+            Dispatch;
+        undefined ->
+            []
+    end.
 
 set_dispatch_list(DispatchList) ->
     ok = application:set_env(webmachine, dispatch_list, DispatchList),