Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Dave Griffiths
mongoose-2000
Commits
c3dbb056
Commit
c3dbb056
authored
Oct 31, 2013
by
Dave Griffiths
Browse files
version bump
parent
8dcd42fa
Changes
2
Hide whitespace changes
Inline
Side-by-side
android/AndroidManifest.xml
View file @
c3dbb056
<?xml version="1.0" encoding="utf-8"?>
<manifest
xmlns:android=
"http://schemas.android.com/apk/res/android"
package=
"foam.mongoose"
android:versionCode=
"
1
"
android:versionCode=
"
2
"
android:versionName=
"1.0"
>
<application
android:label=
"@string/app_name"
android:icon=
"@drawable/logo"
...
...
android/assets/eavdb.scm
View file @
c3dbb056
...
...
@@ -147,14 +147,11 @@
;; update the value given an entity type, a attribute type and it's key (= attriute_id)
;; creates the value if it doesn't already exist, updates it otherwise
(
define
(
update-value
db
table
entity-id
ktv
)
(
msg
"update-value"
)
(
if
(
null?
(
dbg
(
select-first
db
(
string-append
"select * from "
table
"_value_"
(
ktv-type
ktv
)
" where entity_id = ? and attribute_id = ?"
)
entity-id
(
ktv-key
ktv
))))
(
begin
(
msg
"could't find "
(
ktv-key
ktv
))
(
insert-value
db
table
entity-id
ktv
))
(
if
(
null?
(
select-first
db
(
string-append
"select * from "
table
"_value_"
(
ktv-type
ktv
)
" where entity_id = ? and attribute_id = ?"
)
entity-id
(
ktv-key
ktv
)))
(
insert-value
db
table
entity-id
ktv
)
(
db-exec
db
(
string-append
"update "
table
"_value_"
(
ktv-type
ktv
)
" set value=? where entity_id = ? and attribute_id = ?"
)
...
...
@@ -286,10 +283,8 @@
(
when
(
not
(
equal?
(
ktv-key
ktv
)
"unique_id"
))
(
find/add-attribute-type
db
table
entity-type
(
ktv-key
ktv
)
(
ktv-type
ktv
))))
ktvlist
)
(
for-each
(
lambda
(
ktv
)
(
msg
"updating"
(
ktv-key
ktv
)
"with"
(
ktv-value
ktv
))
(
update-value
db
table
entity-id
ktv
))
ktvlist
)))))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment