Index: openacs-4/packages/acs-datetime/www/doc/design.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-datetime/www/doc/design.adp,v diff -u -N -r1.4.2.2 -r1.4.2.3 --- openacs-4/packages/acs-datetime/www/doc/design.adp 3 Sep 2021 09:15:39 -0000 1.4.2.2 +++ openacs-4/packages/acs-datetime/www/doc/design.adp 23 Mar 2023 13:17:53 -0000 1.4.2.3 @@ -92,10 +92,7 @@ date
  • dt_widget_calendar_year generates a yearly calendar based on calendar year (Jan to Dec), given any date within -that calendar year
  • -dt_widget_calendar_navigation generates a calendar -navigation widget with viewing options for day, week, month and -year
  • +that calendar year

    XII. Future Improvements/Areas of Likely Change

    Many of the calendar widgets generate extensive HTML from within Index: openacs-4/packages/acs-datetime/www/doc/design.html =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-datetime/www/doc/design.html,v diff -u -N -r1.3.2.1 -r1.3.2.2 --- openacs-4/packages/acs-datetime/www/doc/design.html 13 Aug 2019 07:25:24 -0000 1.3.2.1 +++ openacs-4/packages/acs-datetime/www/doc/design.html 23 Mar 2023 13:17:53 -0000 1.3.2.2 @@ -111,9 +111,7 @@ given the starting month as a date

  • dt_widget_calendar_year generates a yearly calendar based on calendar year (Jan to Dec), given any date within that -calendar year -
  • dt_widget_calendar_navigation generates a calendar -navigation widget with viewing options for day, week, month and year +calendar year

    XII. Future Improvements/Areas of Likely Change

    Index: openacs-4/packages/acs-datetime/www/doc/examples/calendar-navigation.adp =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-datetime/www/doc/examples/calendar-navigation.adp,v diff -u -N --- openacs-4/packages/acs-datetime/www/doc/examples/calendar-navigation.adp 7 Aug 2017 23:47:55 -0000 1.6 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,42 +0,0 @@ - - - - -@title;literal@ -@context;literal@ - -
    dt_widget_calendar_navigation base_url view date pass_in_vars 
    - -

    -

    -
    Parameters:
    -base_url (optional)
    -view (defaults to week)
    -date (optional)
    -pass_in_vars (optional)
    -
    -
    - -

    This procedure creates a mini calendar useful for navigating -various calendar views. It takes a base url, which is the url to -which this mini calendar will navigate. When defined, -pass_in_vars can be url variables to be set in -base_url. They should be in the format returned by -export_url_vars. This procedure will set two variables -in that url's environment: view and date. - -

    Valid views are list, day, week, month, and year.

    - -

    Example

    - -

    The following shows a sample navigation form for this page, which -simply reads view and date as URL variables -and uses them to initialize the display. - - -@calendar_widget;noquote@ - - -

    Click on any view, date, or other navigational element to change -the display of this page.

    - Index: openacs-4/packages/acs-datetime/www/doc/examples/calendar-navigation.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-datetime/www/doc/examples/calendar-navigation.tcl,v diff -u -N --- openacs-4/packages/acs-datetime/www/doc/examples/calendar-navigation.tcl 7 Aug 2017 23:47:55 -0000 1.5 +++ /dev/null 1 Jan 1970 00:00:00 -0000 @@ -1,39 +0,0 @@ -# /packages/acs-datetime/www/doc/calendar-widgets.tcl - -ad_page_contract { - - Examples of various calendar widgets - - @author ron@arsdigita.com - @creation-date 2000-12-08 - @cvs-id $Id: calendar-navigation.tcl,v 1.5 2017/08/07 23:47:55 gustafn Exp $ -} { - {view:word ""} - {date ""} -} -properties { - title:onevalue - calendar_widget:onevalue -} -validate { - date_valid -requires date { - # - # Check for the date formats accepted by lc_time_fmt - # - if {[catch {lc_time_fmt $date %B} errorMsg]} { - ad_complain "Invalid date" - } - } -} - -set title "Calendar Navigation" -set context [list [list . "ACS DateTime Examples"] $title] - -set calendar_widget [dt_widget_calendar_navigation "" $view $date] - -ad_return_template - - -# Local variables: -# mode: tcl -# tcl-indent-level: 4 -# indent-tabs-mode: nil -# End: