Skip to content

Instantly share code, notes, and snippets.

%% @author author <daniel.kwiecinski@lambder.com>
%% @copyright Daniel Kwiecinski.
%% @doc Static webmachine resource.
-module(static_resource).
-export([init/1, allowed_methods/2,
content_types_provided/2, resource_exists/2, last_modified/2, provide_content/2]).
-include_lib("webmachine/include/webmachine.hrl").
-include_lib("kernel/include/file.hrl").
bs_by_a_id(A_id) ->
find(qlc:q([ B || B=#b{f_id=F_id} <- mnesia:table(b), F_id == A_id])).
as_with_bs() ->
find(
qlc:q([ {A,bs_by_a_id(A#a.id)} || A <- mnesia:table(a)])
).
top_as_with_some_bs(Limit) ->
top(
require 'rexml/document'
require 'net/https'
require 'rexchange/dav_search_request'
require 'rexchange/message'
require 'rexchange/contact'
require 'rexchange/appointment'
require 'rexchange/note'
require 'rexchange/task'
require 'uri'
dfdsfsf