Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Newer
Older
100644 89 lines (83 sloc) 1.459 kb
b31a690 @jonjensen Move DEV_4_7_0 development branch to repository trunk.
jonjensen authored
1 AutoVariable <<EOF
2 DefaultShipping
3 DescriptionField
4 ImageDir
5 ImageDirSecure
6 MailOrderTo
7 PriceField
8 ProductFiles
9 ProductDir
10 SecureURL
11 VendURL
12 EOF
13
14 ifdef @UI
14156fd @perusionmike Modified catalog_after.cfg so that default is default profile.
perusionmike authored
15 UserDB ui database access
16 UserDB ui crypt 1
d628b6e @perusionmike Major changes to access manager. Means modifying nearly every file
perusionmike authored
17 UserDB ui time_field last_login
14156fd @perusionmike Modified catalog_after.cfg so that default is default profile.
perusionmike authored
18 UserDB ui admin 1
19 UserDB default admin 0
b31a690 @jonjensen Move DEV_4_7_0 development branch to repository trunk.
jonjensen authored
20
21 #AdminSub <<EOR
22 #add_gpg_key
23 #backup_database
24 #backup_file
25 #check_upload
26 #db_columns
27 #db_hash
28 #dbinfo
29 #directive_value
30 #dump_session
31 #export_database
32 #file_navigator
33 #global_value
34 #grep_mm
35 #if_mm
36 #if_sql
37 #import_fields
38 #list_databases
39 #list_glob
40 #list_keys
41 #list_pages
42 #mm_value
43 #read_shipping
44 #read_ui_template
45 #regenerate
46 #rotate_file
47 #row_edit
48 #set_alias
49 #substitute_file
50 #uneval
51 #unlink_file
52 #version
53 #widget
54 #with
55 #write_relative_file
56 #write_shipping
57 #EOR
58
efe1bb1 @perusionmike The whirlwind swept through. 8-\
perusionmike authored
59 ParseVariables Yes
60
61 ActionMap ui_download <<EOR
62 sub {
63 my $deliverable = shift;
64 my $status;
65 $CGI->{mv_nextpage} =~ s:^ui_download/::;
66 $CGI->{mv_nextpage} .= $Session->{extension};
67 if($Tag->if_mm('files', $CGI->{mv_nextpage}) ) {
b31a690 @jonjensen Move DEV_4_7_0 development branch to repository trunk.
jonjensen authored
68 # Take care of MSIE brain damage
69 if($Session->{browser} =~ /msie/i) {
70 $Document->header("Content-type: application/x-foolmsie");
71 }
72 else {
73 $Document->header("Content-type: application/octet-stream");
74 }
efe1bb1 @perusionmike The whirlwind swept through. 8-\
perusionmike authored
75 $Document->hot(1);
76 HTML ( $Tag->file($CGI->{mv_nextpage}) );
77 $status = 0;
78 }
79 else {
80 $Scratch->{ui_error} = "Not authorized for file $CGI->{mv_nextpage}";
81 $CGI->{mv_nextpage} = '__UI_BASE__/error';
82 $status = 1;
83 }
84 return $status;
85 }
86 EOR
ed44c7c @perusionmike Added new menu variables to catalog_before.cfg, fits new U.
perusionmike authored
87
b31a690 @jonjensen Move DEV_4_7_0 development branch to repository trunk.
jonjensen authored
88 endif
Something went wrong with that request. Please try again.