Subversion Repositories DevTools

Rev

Rev 7387 | Rev 7460 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7387 Rev 7397
Line 72... Line 72...
72
#                                   requires    - Items must also be defined (accept comma sep list)
72
#                                   requires    - Items must also be defined (accept comma sep list)
73
#                                   fmt         - Format
73
#                                   fmt         - Format
74
#                                                   'size'      - convert to block
74
#                                                   'size'      - convert to block
75
#                                                   'period'    - convert to time
75
#                                                   'period'    - convert to time
76
#                                                   'dir'       - Directory
76
#                                                   'dir'       - Directory
-
 
77
#                                                   'mkdir'     - Directory - last element can be created
77
#                                                   'file'      - File
78
#                                                   'file'      - File
78
#                                                   'vfile'     - File. Path must exist
79
#                                                   'vfile'     - File. Path must exist
79
#                                                   'int'       - integer
80
#                                                   'int'       - integer
80
#                                                   'int_list'  - A list of integers
81
#                                                   'int_list'  - A list of integers
81
#                                                   'text'      - Random Text
82
#                                                   'text'      - Random Text
Line 227... Line 228...
227
 
228
 
228
            } elsif ( $fmt eq 'dir' ) {
229
            } elsif ( $fmt eq 'dir' ) {
229
                if ( ! -d $data ) {
230
                if ( ! -d $data ) {
230
                    push @errors, "Directory not found:$key: $data";
231
                    push @errors, "Directory not found:$key: $data";
231
                }
232
                }
-
 
233
            } elsif ( $fmt eq 'mkdir' ) {
-
 
234
                if ( ! -d $data ) {
-
 
235
                    mkdir $data;
-
 
236
                    chmod 0777, $data;
-
 
237
                    if ( ! -d $data ) {
-
 
238
                        push @errors, "Directory not created:$key: $data";
-
 
239
                    }
-
 
240
                }
232
            } elsif ( $fmt eq 'file' ) {
241
            } elsif ( $fmt eq 'file' ) {
233
                if ( ! -f $data ) {
242
                if ( ! -f $data ) {
234
                    push @errors, "File not found:$key: $data";
243
                    push @errors, "File not found:$key: $data";
235
                }
244
                }
236
            } elsif ( $fmt eq 'vfile' ) {
245
            } elsif ( $fmt eq 'vfile' ) {