Index: openacs-4/packages/acs-templating/catalog/acs-templating.de_DE.ISO-8859-1.xml
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/catalog/acs-templating.de_DE.ISO-8859-1.xml,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/acs-templating/catalog/acs-templating.de_DE.ISO-8859-1.xml 8 Jun 2005 16:36:18 -0000 1.7
+++ openacs-4/packages/acs-templating/catalog/acs-templating.de_DE.ISO-8859-1.xml 21 Jun 2005 13:41:46 -0000 1.8
@@ -21,7 +21,7 @@
Minuten
Monat
Weiter >>
- Keine %row_pretty_plural% vorhanden
+ Keine Daten vorhanden
<< Zur�ck
Angabe erforderlich
Sekunden
Index: openacs-4/packages/acs-templating/tcl/file-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/file-procs.tcl,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/acs-templating/tcl/file-procs.tcl 21 Jun 2005 13:07:32 -0000 1.7
+++ openacs-4/packages/acs-templating/tcl/file-procs.tcl 21 Jun 2005 13:41:46 -0000 1.8
@@ -56,66 +56,3 @@
}
-ad_proc -private template::util::file::generate_filename {
- {-title:required}
- {-extension:required}
- {-existing_filenames ""}
- {-party_id ""}
-} {
- Generate a pretty filename that relates to the title supplied and is unique
-
- @param party_id if supplied the filenames associated with this party will be used as existing_filenames if existing filenames is not provided
-
- @param existing_filenames a list of filenames that the generated filename must not be equal to
-} {
-}
-
-ad_proc -public template::util::file::store_for_party {
- {-upload_file:required}
- {-party_id:required}
- {-package_id ""}
-} {
- Store the file uploaded under the party_id if a file was uploaded
-
- @author Malte Sussdorff (sussdorff@sussdorff.de)
- @creation-date 2005-06-21
-
- @param upload_file
-
- @param party_id
-
- @return the revision_id of the generated item
-
- @error
-} {
-
- set filename [template::util::file::get_property filename $upload_file]
- if {$filename != "" } {
- set tmp_filename [template::util::file::get_property tmp_filename $upload_file]
- set mime_type [template::util::file::get_property mime_type $upload_file]
- set tmp_size [file size $tmp_filename]
- set extension [file extension $filename]
- if {![exists_and_not_null title]} {
- regsub -all ".${extension}\$" $filename "" title
- }
-
- set existing_filenames [db_list get_parties_existing_filenames {}]
- set filename [util_text_to_url \
- -text ${title} -replacement "_"]
- set output_filename "${filename}.${extension}"
- set num 1
- while {[lsearch $existing_filenames $output_filename] >= 0} {
- set output_filename "${filename}${num}.${extension}"
- incr num
- }
-
- set filename $output_filename
-
- set revision_id [cr_import_content \
- -storage_type "file" -title $title -package_id $package_id $party_id $tmp_filename $tmp_size $mime_type $filename]
-
- content::item::set_live_revision -revision_id $revision_id
-
- return $revision_id
- }
-}
Fisheye: Tag 1.2 refers to a dead (removed) revision in file `openacs-4/packages/acs-templating/tcl/file-procs.xql'.
Fisheye: No comparison available. Pass `N' to diff?