1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
|
<?php
/*
* $Horde: kronolith/addevent.php,v 1.31.2.5 2005/01/03 11:25:57 jan Exp $
*
* Copyright 1999-2005 Charles J. Hagenbuch <chuck@horde.org>
*
* See the enclosed file COPYING for license information (GPL). If you
* did not receive this file, see http://www.fsf.org/copyleft/gpl.html.
*/
define('KRONOLITH_BASE', dirname(__FILE__));
require KRONOLITH_BASE . '/lib/base.php';
$event = $calendar->getEventObject();
if (!$timestamp = Horde::getFormData('timestamp')) {
$month = Horde::getFormData('month', date('n'));
$day = Horde::getFormData('mday', date('j'));
$year = Horde::getFormData('year', date('Y'));
$timestamp = mktime(8, 0, 0, $month, $day, $year);
}
$url = Horde::getFormData('url');
$event->setStartTimestamp($timestamp);
$event->setEndTimestamp($timestamp + 3600);
$event->setRecurType(KRONOLITH_RECUR_NONE);
$month = date('n', $timestamp);
$year = date('Y', $timestamp);
$title = _("Add a new event");
$js_onLoad = null;
require KRONOLITH_TEMPLATES . '/common-header.inc';
require KRONOLITH_BASE . '/menu.php';
require KRONOLITH_TEMPLATES . '/edit/javascript.inc';
require KRONOLITH_TEMPLATES . '/edit/edit.inc';
require KRONOLITH_TEMPLATES . '/common-footer.inc';
|
