packimages.pl (b9fd132d) | packimages.pl (81afc36f) |
---|---|
1: 2eval 'exec perl -wS $0 ${1+"$@"}' 3 if 0; 4#************************************************************** 5# 6# Licensed to the Apache Software Foundation (ASF) under one 7# or more contributor license agreements. See the NOTICE file 8# distributed with this work for additional information --- 384 unchanged lines hidden (view full) --- 393 print STDERR "Creates archive of images\n"; 394 print STDERR "Options:\n"; 395 print STDERR " -h print this help\n"; 396 print STDERR " -o out_file path to output archive\n"; 397 print STDERR " -g g_path path to global images directory\n"; 398 print STDERR " -m m_path path to module images directory\n"; 399 print STDERR " -c c_path path to custom images directory\n"; 400 print STDERR " -s sort_file path to image sort order file\n"; | 1: 2eval 'exec perl -wS $0 ${1+"$@"}' 3 if 0; 4#************************************************************** 5# 6# Licensed to the Apache Software Foundation (ASF) under one 7# or more contributor license agreements. See the NOTICE file 8# distributed with this work for additional information --- 384 unchanged lines hidden (view full) --- 393 print STDERR "Creates archive of images\n"; 394 print STDERR "Options:\n"; 395 print STDERR " -h print this help\n"; 396 print STDERR " -o out_file path to output archive\n"; 397 print STDERR " -g g_path path to global images directory\n"; 398 print STDERR " -m m_path path to module images directory\n"; 399 print STDERR " -c c_path path to custom images directory\n"; 400 print STDERR " -s sort_file path to image sort order file\n"; |
401 print STDERR " -l imagelist_path path to directory containing image lists (may appear mutiple times)\n"; | 401 print STDERR " -l imagelist_path path to directory containing image lists (may appear multiple times)\n"; |
402 print STDERR " -v verbose\n"; 403 print STDERR " -vv very verbose\n"; 404} 405 406sub print_message 407{ 408 my $message = shift; 409 --- 28 unchanged lines hidden --- | 402 print STDERR " -v verbose\n"; 403 print STDERR " -vv very verbose\n"; 404} 405 406sub print_message 407{ 408 my $message = shift; 409 --- 28 unchanged lines hidden --- |