Commit aa1d8b530ed5b936a9375a253e0520cbd038bcfb

Authored by totoro
1 parent 889ced71

add surrounding _ to list too. For more information, please read the previous commit

model/types/hk_app.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ... @@ -71,8 +71,8 @@ public define Maybe(HK_App)
71 71 if find_message(_hk_app_message, "help") is {failure then failure, success(_help__msg) then
72 72 if (Maybe(HK_Help_Text))from_Message(_help__msg) is {failure then failure, success(_help_) then
73 73 // [type = List(HK_Table)] hk_app.hk_tables
74   - with mb_hk_tables = map_escape(( Message msg ) |-> (Maybe(HK_Table)) from_Message(msg), find_messages(_hk_app_message, "hk_tables")),
75   - if mb_hk_tables is {failure then failure, success(hk_tables) then
  74 + with mb__hk_tables_ = map_escape(( Message msg ) |-> (Maybe(HK_Table)) from_Message(msg), find_messages(_hk_app_message, "hk_tables")),
  75 + if mb__hk_tables_ is {failure then failure, success(_hk_tables_) then
76 76  
77 77 success(hk_app(_app_name_, _icon_, _help_, _hk_tables_))
78 78 }}}}}}
... ...
model/types/hk_app_name.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
model/types/hk_database.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ... @@ -57,8 +57,8 @@ public define Maybe(HK_Database)
57 57 // [type = String] hk_database.name
58 58 if find_string(_hk_database_message, "name") is {failure then failure, success(_name_) then
59 59 // [type = List(HK_App)] hk_database.apps
60   - with mb_apps = map_escape(( Message msg ) |-> (Maybe(HK_App)) from_Message(msg), find_messages(_hk_database_message, "apps")),
61   - if mb_apps is {failure then failure, success(apps) then
  60 + with mb__apps_ = map_escape(( Message msg ) |-> (Maybe(HK_App)) from_Message(msg), find_messages(_hk_database_message, "apps")),
  61 + if mb__apps_ is {failure then failure, success(_apps_) then
62 62  
63 63 success(hk_database(_name_, _apps_))
64 64 }}
... ...
model/types/hk_datetime_field_attr.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
model/types/hk_help_text.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
model/types/hk_icon.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
model/types/hk_int_choice.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
model/types/hk_int_choices.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ... @@ -60,8 +60,8 @@ public define Maybe(HK_Int_Choices)
60 60 else //Alternative int_choices
61 61 if __type_alt__ = "int_choices" then //Alternative int_choices
62 62 // [type = List(HK_Int_Choice)] int_choices.hk_int_choice
63   - with mb_hk_int_choice = map_escape(( Message msg ) |-> (Maybe(HK_Int_Choice)) from_Message(msg), find_messages(_hk_int_choices_message, "hk_int_choice")),
64   - if mb_hk_int_choice is {failure then failure, success(hk_int_choice) then
  63 + with mb__hk_int_choice_ = map_escape(( Message msg ) |-> (Maybe(HK_Int_Choice)) from_Message(msg), find_messages(_hk_int_choices_message, "hk_int_choice")),
  64 + if mb__hk_int_choice_ is {failure then failure, success(_hk_int_choice_) then
65 65  
66 66 success(int_choices(_hk_int_choice_))
67 67 }
... ...
model/types/hk_model.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ... @@ -55,8 +55,8 @@ public define Maybe(HK_Model)
55 55 //Alternative hk_model
56 56 if __type_alt__ = "hk_model" then //Alternative hk_model
57 57 // [type = List(HK_Model_Column)] hk_model.columns
58   - with mb_columns = map_escape(( Message msg ) |-> (Maybe(HK_Model_Column)) from_Message(msg), find_messages(_hk_model_message, "columns")),
59   - if mb_columns is {failure then failure, success(columns) then
  58 + with mb__columns_ = map_escape(( Message msg ) |-> (Maybe(HK_Model_Column)) from_Message(msg), find_messages(_hk_model_message, "columns")),
  59 + if mb__columns_ is {failure then failure, success(_columns_) then
60 60 // [type = String] hk_model.show_string
61 61 if find_string(_hk_model_message, "show_string") is {failure then failure, success(_show_string_) then
62 62  
... ...
model/types/hk_model_attr.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
model/types/hk_model_column.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ... @@ -68,8 +68,8 @@ public define Maybe(HK_Model_Column)
68 68 if find_message(_hk_model_column_message, "type") is {failure then failure, success(_type__msg) then
69 69 if (Maybe(HK_Model_Field))from_Message(_type__msg) is {failure then failure, success(_type_) then
70 70 // [type = List(HK_Model_Attr)] hk_column.attributes
71   - with mb_attributes = map_escape(( Message msg ) |-> (Maybe(HK_Model_Attr)) from_Message(msg), find_messages(_hk_model_column_message, "attributes")),
72   - if mb_attributes is {failure then failure, success(attributes) then
  71 + with mb__attributes_ = map_escape(( Message msg ) |-> (Maybe(HK_Model_Attr)) from_Message(msg), find_messages(_hk_model_column_message, "attributes")),
  72 + if mb__attributes_ is {failure then failure, success(_attributes_) then
73 73 // [type = HK_Help_Text] hk_column.help
74 74 if find_message(_hk_model_column_message, "help") is {failure then failure, success(_help__msg) then
75 75 if (Maybe(HK_Help_Text))from_Message(_help__msg) is {failure then failure, success(_help_) then
... ...
model/types/hk_model_field.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
model/types/hk_table.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
model/types/hk_text_choice.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
model/types/hk_text_choices.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ... @@ -60,8 +60,8 @@ public define Maybe(HK_Text_Choices)
60 60 else //Alternative text_choices
61 61 if __type_alt__ = "text_choices" then //Alternative text_choices
62 62 // [type = List(HK_Text_Choice)] text_choices.hk_text_choice
63   - with mb_hk_text_choice = map_escape(( Message msg ) |-> (Maybe(HK_Text_Choice)) from_Message(msg), find_messages(_hk_text_choices_message, "hk_text_choice")),
64   - if mb_hk_text_choice is {failure then failure, success(hk_text_choice) then
  63 + with mb__hk_text_choice_ = map_escape(( Message msg ) |-> (Maybe(HK_Text_Choice)) from_Message(msg), find_messages(_hk_text_choices_message, "hk_text_choice")),
  64 + if mb__hk_text_choice_ is {failure then failure, success(_hk_text_choice_) then
65 65  
66 66 success(text_choices(_hk_text_choice_))
67 67 }
... ...
model/types/hk_text_field_attr.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
view/types/hk_display.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ... @@ -56,11 +56,11 @@ public define Maybe(HK_Display)
56 56 //Alternative hk_display
57 57 if __type_alt__ = "hk_display" then //Alternative hk_display
58 58 // [type = List(HK_List_View)] hk_display.list_views
59   - with mb_list_views = map_escape(( Message msg ) |-> (Maybe(HK_List_View)) from_Message(msg), find_messages(_hk_display_message, "list_views")),
60   - if mb_list_views is {failure then failure, success(list_views) then
  59 + with mb__list_views_ = map_escape(( Message msg ) |-> (Maybe(HK_List_View)) from_Message(msg), find_messages(_hk_display_message, "list_views")),
  60 + if mb__list_views_ is {failure then failure, success(_list_views_) then
61 61 // [type = List(HK_Edit_View)] hk_display.list_edits
62   - with mb_list_edits = map_escape(( Message msg ) |-> (Maybe(HK_Edit_View)) from_Message(msg), find_messages(_hk_display_message, "list_edits")),
63   - if mb_list_edits is {failure then failure, success(list_edits) then
  62 + with mb__list_edits_ = map_escape(( Message msg ) |-> (Maybe(HK_Edit_View)) from_Message(msg), find_messages(_hk_display_message, "list_edits")),
  63 + if mb__list_edits_ is {failure then failure, success(_list_edits_) then
64 64  
65 65 success(hk_display(_list_views_, _list_edits_))
66 66 }}
... ...
view/types/hk_edit_view.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ... @@ -81,10 +81,10 @@ public define Maybe(HK_Edit_View)
81 81 // [type = String] edit_view_list_form.view_name
82 82 if find_string(_hk_edit_view_message, "view_name") is {failure then failure, success(_view_name_) then
83 83 // [type = List(String)] edit_view_list_form.columns
84   - with columns = find_string_list(_hk_edit_view_message, "columns"),
  84 + with _columns_ = find_string_list(_hk_edit_view_message, "columns"),
85 85 // [type = List(HK_FK_View)] edit_view_list_form.fk_view
86   - with mb_fk_view = map_escape(( Message msg ) |-> (Maybe(HK_FK_View)) from_Message(msg), find_messages(_hk_edit_view_message, "fk_view")),
87   - if mb_fk_view is {failure then failure, success(fk_view) then
  86 + with mb__fk_view_ = map_escape(( Message msg ) |-> (Maybe(HK_FK_View)) from_Message(msg), find_messages(_hk_edit_view_message, "fk_view")),
  87 + if mb__fk_view_ is {failure then failure, success(_fk_view_) then
88 88  
89 89 success(edit_view_list_form(_view_name_, _columns_, _fk_view_))
90 90 }}
... ...
view/types/hk_edit_view_table.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ... @@ -52,8 +52,8 @@ public define Maybe(HK_Edit_View_Table)
52 52 //Alternative table
53 53 if __type_alt__ = "table" then //Alternative table
54 54 // [type = List(HK_Edit_View_Table_Line)] table.lines
55   - with mb_lines = map_escape(( Message msg ) |-> (Maybe(HK_Edit_View_Table_Line)) from_Message(msg), find_messages(_hk_edit_view_table_message, "lines")),
56   - if mb_lines is {failure then failure, success(lines) then
  55 + with mb__lines_ = map_escape(( Message msg ) |-> (Maybe(HK_Edit_View_Table_Line)) from_Message(msg), find_messages(_hk_edit_view_table_message, "lines")),
  56 + if mb__lines_ is {failure then failure, success(_lines_) then
57 57  
58 58 success(table(_lines_))
59 59 }
... ...
view/types/hk_edit_view_table_cell.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
view/types/hk_edit_view_table_line.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ... @@ -52,8 +52,8 @@ public define Maybe(HK_Edit_View_Table_Line)
52 52 //Alternative line
53 53 if __type_alt__ = "line" then //Alternative line
54 54 // [type = List(HK_Edit_View_Table_Cell)] line.cells
55   - with mb_cells = map_escape(( Message msg ) |-> (Maybe(HK_Edit_View_Table_Cell)) from_Message(msg), find_messages(_hk_edit_view_table_line_message, "cells")),
56   - if mb_cells is {failure then failure, success(cells) then
  55 + with mb__cells_ = map_escape(( Message msg ) |-> (Maybe(HK_Edit_View_Table_Cell)) from_Message(msg), find_messages(_hk_edit_view_table_line_message, "cells")),
  56 + if mb__cells_ is {failure then failure, success(_cells_) then
57 57  
58 58 success(line(_cells_))
59 59 }
... ...
view/types/hk_fk_view.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
view/types/hk_form.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
view/types/hk_form_tab.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
view/types/hk_form_table.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
view/types/hk_form_table_cell.anubis
1   -/*
  1 +/*
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
view/types/hk_form_table_line.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ...
view/types/hk_list_view.anubis
... ... @@ -2,7 +2,7 @@
2 2 * Created by 伝作 (Densaku).
3 3 * Types & Messages generator written by フランスのトトロ aka (David RENÉ)
4 4 * Date: 2017-04-09
5   - * Time: 00:57:36
  5 + * Time: 02:17:12
6 6 *
7 7 */
8 8  
... ... @@ -68,7 +68,7 @@ public define Maybe(HK_List_View)
68 68 // [type = String] list_view.view_name
69 69 if find_string(_hk_list_view_message, "view_name") is {failure then failure, success(_view_name_) then
70 70 // [type = List(String)] list_view.columns
71   - with columns = find_string_list(_hk_list_view_message, "columns"),
  71 + with _columns_ = find_string_list(_hk_list_view_message, "columns"),
72 72 // [type = WEB_Action_Name] list_view.link_id_action
73 73 if find_message(_hk_list_view_message, "link_id_action") is {failure then failure, success(_link_id_action__msg) then
74 74 if (Maybe(WEB_Action_Name))from_Message(_link_id_action__msg) is {failure then failure, success(_link_id_action_) then
... ...