Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
I
intranet-rest-fs-openacs
Project
Project
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
project-open
intranet-rest-fs-openacs
Commits
dc2d95f7
Commit
dc2d95f7
authored
Jan 22, 2019
by
Frank Bergmann
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
- Added code to write modification_ and creation_date to im_file_version
parent
eb27f2bb
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
12 additions
and
6 deletions
+12
-6
upload.tcl
www/upload.tcl
+12
-6
No files found.
www/upload.tcl
View file @
dc2d95f7
...
...
@@ -81,20 +81,26 @@ if {!$file_version_exists_p} {
version_id,
version_status_id,
version_type_id,
version_creation_date,
version_modification_date,
version_sha1,
version_upload_comment
) values (
:file_version_id,
[
im_file_version_status_active
]
,
[
im_file_version_type_default
]
,
:creation_date,
:modification_date,
:sha1,
:upload_comment
)
"
set update_sqls
[
list
"version_sha1 = :sha1"
]
if
{
""
ne
$creation
_date &&
"undefined"
ne
$creation
_date
}
{
lappend update_sqls
"version_creation_date = :creation_date"
}
if
{
""
ne
$modification
_date &&
"undefined"
ne
$modification
_date
}
{
lappend update_sqls
"version_modification_date = :modification_date"
}
db_dml update_file_version
"
update im_file_versions set
[
join
$update
_sqls
",
\n\t\t
"
]
where
version_id = :file_version_id
"
}
else
{
ad_return_complaint 1
"file_version update not implemented yet"
}
...
...
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