jdb/timestamper
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Further updates to page. Small update to internal API.

Browse Source 
Internal API update functions now accept partial updates, allowing one to
selectively update only some fields of a particular record.
This commit is contained in:
Jonathan Bernard
2011-02-14 17:16:37 -06:00
parent ddc12cec64
commit 1a3c0d5c4e
6 changed files with 75 additions and 64 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
src/ts_common.erl
View File

@@ -1,5 +1,5 @@
-module(ts_common).
-export([new/1, update/1, list/3, order_datetimes/2]).
-export([new/1, update/1, update_record/2, list/3, order_datetimes/2]).
-include_lib("stdlib/include/qlc.hrl").
@@ -25,9 +25,22 @@ update(Record) ->
% record does not exist, cannot update
[] -> no_record;
% record does exist, update
[_ExistingRecord] -> mnesia:dirty_write(Record)
[ExistingRecord] ->
mnesia:dirty_write(update_record(ExistingRecord, Record))
end.
update_record(Record, UpdateData) ->
update_record(tuple_to_list(Record), tuple_to_list(UpdateData), []).
update_record([], [], Updated) -> list_to_tuple(lists:reverse(Updated));
update_record([Field|RecordFields], [FieldReplacement|UpdateData], Acc) ->
UpdatedField = case FieldReplacement of
undefined -> Field;
NewValue -> NewValue
end,
update_record(RecordFields, UpdateData, [UpdatedField|Acc]).
%% list <Length> number of records, skipping the first <Start>
list(Table, Start, Length)
when is_atom(Table) and is_integer(Start) and is_integer(Length) ->

3
src/ts_entry.erl
View File

@@ -25,7 +25,8 @@ update(ER = #ts_entry{}) ->
% record does not exist
[] -> no_record;
% record exists, update it
[_Record] -> mnesia:dirty_write(ER)
[ExistingRecord] ->
mnesia:dirty_write(ts_common:update_record(ExistingRecord, ER))
end.
lookup(Username, TimelineId, EntryId) ->

4
src/ts_json.erl
View File

@@ -47,7 +47,7 @@ ejson_to_record(_Empty=#ts_timeline{}, EJSON) ->
{struct, Fields} = EJSON,
#ts_timeline{
ref = {undef, undef},
ref = {undefined, undefined},
created = decode_datetime(element(2, lists:keyfind(created, 1, Fields))),
desc = element(2, lists:keyfind(description, 1, Fields))};
@@ -55,7 +55,7 @@ ejson_to_record(_Empty=#ts_entry{}, EJSON) ->
{struct, Fields} = EJSON,
#ts_entry{
ref = {undef, undef, undef},
ref = {undefined, undefined, undefined},
timestamp = calendar:datetime_to_gregorian_seconds(decode_datetime(
element(2, lists:keyfind(timestamp, 1, Fields)))),
mark = element(2, lists:keyfind(mark, 1, Fields)),

28
www/css/ts-screen.css
View File

@@ -102,7 +102,16 @@ form {
form div.form-submit {
float: left;
width: 100%;
overflow: hidden; }
overflow: hidden;
padding: 0.5em 2em 0.5em 2em;
position: relative; }
form div.form-submit div {
position: relative;
float: right;
left: -50%; }
form div.form-submit div input {
position: relative;
left: 50%; }
form div.form-submit input, form input.form-submit {
border: 1px solid #979681;
background: #f6f3ea; }
@@ -125,16 +134,6 @@ form {
color: #626150; }
#user #change-pwd {
display: none; }
#user #user-info .form-submit {
padding: 0.5em 2em 0.5em 2em;
position: relative; }
#user #user-info .form-submit div {
position: relative;
float: right;
left: -50%; }
#user #user-info .form-submit div input {
position: relative;
left: 50%; }
#timeline #timeline-name, #timeline #timeline-desc {
font-weight: bold; }
@@ -142,10 +141,6 @@ form {
color: #626150; }
#timeline .control-links {
padding-top: 0.2em; }
#timeline #timeline-info .form-submit {
width: auto;
float: right;
overflow: inline; }
#user-info, #timeline-info {
display: none;
@@ -159,6 +154,7 @@ form {
#new-entry input {
color: #626150; }
#new-entry #add-notes {
display: none; }
display: none;
padding: 0.5em 0 0.5em 2em; }
#new-entry #new-entry-input {
margin-right: 1em; }

39
www/css/ts-screen.scss
View File

@@ -127,7 +127,21 @@ form {
float: left;
width: 100%;
overflow: hidden;
padding: 0.5em 2em 0.5em 2em;
position: relative;
div {
position: relative;
float: right;
left: -50%;
input {
position: relative;
left: 50%;
}
}
}
div.form-submit input, input.form-submit {
border: 1px solid $bbor;
@@ -156,19 +170,6 @@ form {
#change-pwd { display: none; }
#user-info .form-submit {
padding: 0.5em 2em 0.5em 2em;
position: relative;
div {
position: relative;
float: right;
left: -50%;
input {
position: relative;
left: 50%;
}
}
}
}
@@ -180,12 +181,6 @@ form {
.control-links { padding-top: 0.2em; }
#timeline-info .form-submit {
width: auto;
float: right;
overflow: inline;
}
}
#user-info, #timeline-info {
@@ -204,6 +199,10 @@ form {
input { color: $greyTxt; }
#add-notes { display: none; }
#add-notes {
display: none;
padding: 0.5em 0 0.5em 2em;
}
#new-entry-input { margin-right: 1em; }
}

36
www/ts/index.yaws
View File

@@ -2,9 +2,11 @@
<html>
<head>
<title>TimeStamper - Simple Time Tracking</title>
<link rel="stylesheet" media="screen" href="../css/ts-screen.css" type="text/css"/>
<script type="text/javascript" src="../js/jquery-1.5.min.js"></script>
<script type="text/javascript" src="../js/ts.js"></script>
<meta http-equiv="Content-Type" content="text/html;charset=utf-8" />
</head>
<body>
@@ -21,32 +23,33 @@
<div id="user-info">
<form action="/ts/update-user.yaws" onsubmit="updateUser(event)">
<div class="form-col">
<label for="fullname"><span>name:</span>
<label for="fullname-input"><span>name:</span>
<input id="fullname-input" name="fullname"
class="text-input" type="text"/>
</label>
<label for="email"><span>email:</span>
<label for="email-input"><span>email:</span>
<input id="email-input" name="email"
class="text-input" type="text"/>
</label>
</div>
<div class="form-col">
<div id="change-pwd">
<label for="old-pwd"><span>password:</span>
<label for="old-pwd-input"><span>password:</span>
<input id="old-pwd-input" name="old-pwd"
class="text-input" type="password"/>
</label>
<label for="new-pwd"><span>new pwd:</span>
<label for="new-pwd-input"><span>new pwd:</span>
<input id="new-pwd-input" name="new-pwd"
class="text-input" type="password"/>
</label>
<label for="new-pwd-conf"><span>confirm:</span>
<label for="new-pwd-conf-input"><span>confirm:</span>
<input id="new-pwd-conf-input" name="new-pwd-conf"
class="text-input" type="password"/>
</label>
</div>
<label for="enable-pwd-change">
<label for="enable-pwd-change-input">
<input name="enable-pwd-change" type="checkbox"
id="enable-pwd-change-input"
onclick="showChangePwd(event)"/>
change password
</label>
@@ -74,13 +77,13 @@
<div id="timeline-info">
<form action="/ts/update-timeline.yaws"
onsubmit="updateTimeline(event); false">
<label for="timeline-desc"><span>description:</span>
<label for="timeline-desc-input"><span>description:</span>
<input id="timeline-desc-input" class="text-input"
name="timeline-desc" type="text"/>
</label>
<div class="form-submit">
<input name="submit-timeline" type="submit"
value="save changes"/>
<div><input name="submit-timeline" type="submit"
value="save changes"/></div>
</div>
</form>
</div>
@@ -88,20 +91,19 @@
<div id="new-entry" class="bar last-bar">
<form action="/ts/new-entry.yaws" onsubmit="newEntry(event)">
<span for="new-entry">begin a new activity:
begin a new activity:
<input name="new-entry" id="new-entry-input"
class="text-input" type="text"/>
<input name=submit-entry" id="submit-entry"
<input name="submit-entry" id="submit-entry"
class="form-submit" type="submit" value="create entry"/>
<div class="control-links">
<a id="show-notes" href="#"
onclick="showNewNotes(event)"/>add notes</a>
onclick="showNewNotes(event)">add notes</a>
</div>
</span>
<div id="add-notes">
<label for="new-notes">notes:</label>
<input name="new-notes" id="new-notes-input"
class="text-input" type="textarea"/>
<div id="add-notes" class="form-col">
<label for="new-notes-input">notes:</label>
<textarea name="new-notes" id="new-notes-input"
class="text-input" rows="8" cols="40" ></textarea>
</div>
</form>
</div>