… | |
… | |
479 | } |
479 | } |
480 | sub smoothOut { |
480 | sub smoothOut { |
481 | local ($sm); |
481 | local ($sm); |
482 | print SMOOTHS "##########################################################\n"; |
482 | print SMOOTHS "##########################################################\n"; |
483 | print SMOOTHS "# Do not touch this file. #\n"; |
483 | print SMOOTHS "# Do not touch this file. #\n"; |
484 | print SMOOTHS "# It has been generated from the informations present #\n"; |
484 | print SMOOTHS "# It has been generated from the information present #\n"; |
485 | print SMOOTHS "# in the archetype files. #\n"; |
485 | print SMOOTHS "# in the archetype files. #\n"; |
486 | print SMOOTHS "# To add new entries, simply add #\n"; |
486 | print SMOOTHS "# To add new entries, simply add #\n"; |
487 | print SMOOTHS "# smoothface xxx yyy #\n"; |
487 | print SMOOTHS "# smoothface xxx yyy #\n"; |
488 | print SMOOTHS "# to an archetype and collect.pl will put below an entry #\n"; |
488 | print SMOOTHS "# to an archetype and collect.pl will put below an entry #\n"; |
489 | print SMOOTHS "# xxx yyy #\n"; |
489 | print SMOOTHS "# xxx yyy #\n"; |