kitchen.erl

-module(kitchen).
-compile(export_all). %% Probably replace with -export([funcs])
-author("John Tyree").

fridge2(FoodList) ->
    receive
        {From, show} ->
            From ! {self(), FoodList},
            fridge2(FoodList);
        {From, {store, Food}} ->
            From ! {self(), ok},
            fridge2([Food|FoodList]);
        {From, {take, Food}} ->
            case lists:member(Food, FoodList) of
                true ->
                    From ! {ok, Food},
                    fridge2(lists:delete(Food,FoodList));
                false ->
                    From ! {self(), not_found},
                    fridge2(FoodList)
            end;
        terminate ->
            ok
    end.