You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
63 lines
3.2 KiB
63 lines
3.2 KiB
2 years ago
|
{% include "shared/errors.html" %}
|
||
|
<p>{{entry.date-posted}}</p>
|
||
|
<table class="attr">
|
||
|
<tr>
|
||
|
<th width="80"><label for="title">Title</label></th>
|
||
|
<td><input type="text" name="TITLE" id="title" size="50" value="{{entry.title}}"/></td>
|
||
|
</tr>
|
||
|
<tr>
|
||
|
<th><label for="body">Body</label></th>
|
||
|
<td><textarea name="BODY" id="body" rows="10" cols="45">{{entry.body}}</textarea></td>
|
||
|
</tr>
|
||
|
<tr>
|
||
|
<th><label for="posted-at">Date</label></th>
|
||
|
<td>
|
||
|
<select id="posted-year" name="POSTED-YEAR">
|
||
|
{{ entry.date-posted
|
||
|
| lisp: (lambda(timestamp)
|
||
|
(let ((year (local-time:timestamp-year (local-time:now))))
|
||
|
(date-options :start 2000 :end (1+ year)
|
||
|
:target (local-time:timestamp-year timestamp))))
|
||
|
| safe
|
||
|
}}
|
||
|
</select>
|
||
|
<select id="posted-month" name="POSTED-MONTH">
|
||
|
{{ entry.date-posted
|
||
|
| lisp: (lambda(timestamp)
|
||
|
(date-options :start 1 :end 12
|
||
|
:target (local-time:timestamp-month timestamp)))
|
||
|
| safe }}
|
||
|
</select>
|
||
|
<select id="posted-day" name="POSTED-DAY">
|
||
|
{{ entry.date-posted
|
||
|
| lisp: (lambda(timestamp)
|
||
|
(date-options :start 1 :end 31
|
||
|
:target (local-time:timestamp-day timestamp)))
|
||
|
| safe }}
|
||
|
</select>
|
||
|
-
|
||
|
<select id="posted-hour" name="POSTED-HOUR">
|
||
|
{{ entry.date-posted
|
||
|
| lisp: (lambda(timestamp)
|
||
|
(date-options :end 59 :target (local-time:timestamp-hour timestamp)))
|
||
|
| safe }}
|
||
|
</select>
|
||
|
<select id="posted-min" name="POSTED-MIN">
|
||
|
{{ entry.date-posted
|
||
|
| lisp: (lambda(timestamp)
|
||
|
(date-options :end 59 :target (local-time:timestamp-minute timestamp)))
|
||
|
| safe }}
|
||
|
</select>
|
||
|
</td>
|
||
|
</tr>
|
||
|
<tr>
|
||
|
<th><label for="status">Status</label></th>
|
||
|
<td><select id="status" name="STATUS">
|
||
|
<option value="draft" selected>Draft</option>
|
||
|
<option value="member-only">Member only</option>
|
||
|
<option value="public">Public</option>
|
||
|
</select>
|
||
|
</td>
|
||
|
</tr>
|
||
|
</table>
|