List of commits:
Subject Hash Author Date (UTC)
implement group adding d347e25e93e94f711c4098fecc9775af22eb7309 Alex 2022-07-12 20:12:00
make parser to work somehow bb968a00680246434eb1f9795ebde4babea3fb05 Alex 2022-07-12 05:19:43
some preparations for parsing 0259ef32db69fdb45bc9e67d88c74aca4ae69ce6 Alex 2022-07-12 03:59:45
prepare png icon b7dc494acb640d92c5b7b49bc2ee93fd5a0d521c Alex 2022-07-11 07:17:47
fetching is ready 0d01c38238a2ea7e39bc671de1997294231d8549 Alex 2022-07-11 06:37:06
read feeds from feeds.json U¾ivatel asi bude chtit mít své fidy u sebe de14a1e9f5a99f79e44985073df04e89bae2c116 Alex 2022-07-11 01:26:52
prepare default feeds d2b45f0007c30da84662b8b2a1f2118d03e30e1f Alex 2022-07-11 01:25:58
prepare Lock&Unlock f76041ef4fa2b6d5301afb34bda5de13f8ff2701 Alex 2022-07-10 00:37:38
prepare downloading routines f12d337da75c3cefe4ef0ccb3f08472e7701b058 Alex 2022-07-09 23:52:36
move default feeds to feeds.hws 6efc0f7c1767a2feba618938c8f83eab43f93b0e Alex 2022-07-09 14:16:44
set up EmptyNodes attribute 41e19a0974fbf63f959fe7e3135d2efb9cb48ce6 Alex 2022-07-09 11:44:03
disable icon menu 540099f84a9d1a567dd079ca8ba5ac667ec8945f Alex 2022-07-08 23:37:47
implement tree manipulation commands dfa3a877079a75d7c5a724bb9c6e84a6db1d4677 Alex 2022-07-08 21:07:10
implement coping to clipboard 380b60dad4bd182a92199db5cde4339baaa84521 Alex 2022-07-08 20:35:05
prepare context menus eb75fc61825de235f63b47176ca9ec88f8966d2b Alex 2022-07-08 15:01:46
add cycle chains b0d80feff1cfb953d50a79e7773077a846cc72c2 Alex 2022-07-08 12:25:15
prepare layout 46613958a1e87944104f74aa77ebb106dc22a2ad Alex 2022-07-07 23:36:19
implement Load/Save feeds' tree ce6ded536ef07a49e96f181c07c84c1239ef607d Alex 2022-07-05 23:10:44
implement feed tree filling dad148576a106072f87be33803e7a916cb044d35 Alex 2022-07-05 17:09:20
implement item selection b42586a38c98a4087937b8f85f7dd2570cb61bf7 Alex 2022-06-19 02:42:29
Commit d347e25e93e94f711c4098fecc9775af22eb7309 - implement group adding
Author: Alex
Author date (UTC): 2022-07-12 20:12
Committer name: Alex
Committer date (UTC): 2022-07-12 20:12
Parent(s): bb968a00680246434eb1f9795ebde4babea3fb05
Signer:
Signing key:
Signing status: N
Tree: d6ae0aa993da21596ecffd2a6e22178d2bb7a7cb
File Lines added Lines deleted
IvoRSS.hws 9 0
feedtree.hws 53 0
File IvoRSS.hws changed (mode: 100755) (index 01430ee..0ea6e9a)
... ... Function p_MUIEvent(msg)
106 106 FallThrough FallThrough
107 107 Case "fdtm_save": Case "fdtm_save":
108 108 p_SaveFeeds() p_SaveFeeds()
109
110 Case "menu_addgroup":
111 FallThrough
112 Case "fdtm_addgroup":
113 p_CreateGroup()
109 114
110 115 Case "menu_hide": Case "menu_hide":
111 116 FallThrough FallThrough
 
... ... Function p_MUIEvent(msg)
124 129
125 130 Case "fdtm_fetch": Case "fdtm_fetch":
126 131 p_FetchCurrent() p_FetchCurrent()
132
133 Case "fdtm_remove":
134 p_RemoveCurrent()
127 135
128 136
129 137
 
... ... InstallEventHandler({MUIRoyale = p_MUIEvent})
301 309 p_StartUpLoading() p_StartUpLoading()
302 310
303 311
312
304 313 Repeat Repeat
305 314 WaitEvent WaitEvent
306 315 Forever Forever
File feedtree.hws changed (mode: 100755) (index 08e4a77..73109d1)
... ... Function p_FetchFeed(feedid$)
107 107 EndFunction EndFunction
108 108
109 109
110 Function p_RemoveCurrent()
111 Local isFound, t = mui.DoMethod(#LIST_TREE, "GetEntry", "Active", "Active", "")
112 If isFound And mui.Request("Delete ".. IIf(t.Node, "group", "RSS feed"),
113 "Do you realy want to delete ".. t.Name ..
114 IIf(t.Node, "group and all its content?", "?"),
115 "Yes|*Cancel", "Warning")
116 mui.DoMethod(#LIST_TREE, "Remove", "Active", t.id)
117 ;č vyhodit i přidružená data.
118 ;č Hollywood se pak doopravdy se tváří, že tu položku nikdy neznal,
119 ;č HaveItem je vrací lež no a přístup pak způsobí chybu
120 feedsdata[t.id] = nil
121 ;č Na soubory ve složce Feeds sereme?
122 EndIf
123 EndFunction
124
125
126 Function p_CreateGroup()
127 Local s$, ok = StringRequest("Create Group", "Enter new group name")
128 If s$ = "" Then Return()
129 Local found, t = mui.DoMethod(#LIST_TREE, "FindName", "Root", "\27b"..s$, "")
130 If p_HasItem(s$, "Root")
131 mui.Set("status", "Contents", "\27bGroup "..s$ .. " already exists")
132 Else
133 mui.DoMethod(#LIST_TREE, "Insert", "\27b"..s$, s$, "Root",
134 IIf(mui.Get(#LIST_TREE, "Active")="Off", "Tail","Active"),
135 "List; Active")
136 ;p_Replay(err_code, "Group ".."\27b"..s$ .. " has been created")
137 EndIf
138 EndFunction
139
140
141
142
143 ;č Kurňadrát, RapaGUI takové starosti nemá...
144 ;č jen pro zábavu
145 Function p_CanHas(nodeid$)
146 Return(Not p_HasItem(nodeid$, "Root"))
147 EndFunction
148
149 ;č tohle musí být rekurzivní
150 Function p_HasItem(nodeid$, muiid)
151 Local isFound, t = mui.DoMethod(#LIST_TREE, "GetEntry", muiid, "Head", "")
152 While isFound
153 ;InsertItem(tabletree, {id=t.id, name=t.name, isNode=t.node, parent=nodeid})
154 If t.id = nodeid$ Then Return(True)
155 If t.Node And p_HasItem(nodeid$, t.muiid) Then Return(True)
156 isFound, t = mui.DoMethod(#LIST_TREE, "GetEntry", t.muiid, "Next", "")
157 Wend
158 Return(False)
159 EndFunction
160
161
162
110 163 ;bool = IsOnline() ;bool = IsOnline()
111 164 ;r$ = StripStr(s$) ;r$ = StripStr(s$)
112 165
Hints:
Before first commit, do not forget to setup your git environment:
git config --global user.name "your_name_here"
git config --global user.email "your@email_here"

Clone this repository using HTTP(S):
git clone https://rocketgit.com/user/iam-git/IvoRSS

Clone this repository using ssh (do not forget to upload a key first):
git clone ssh://rocketgit@ssh.rocketgit.com/user/iam-git/IvoRSS

Clone this repository using git:
git clone git://git.rocketgit.com/user/iam-git/IvoRSS

You are allowed to anonymously push to this repository.
This means that your pushed commits will automatically be transformed into a merge request:
... clone the repository ...
... make some changes and some commits ...
git push origin main