X-Git-Url: https://ruderich.org/simon/gitweb/?a=blobdiff_plain;f=lib.sh;h=da00cce8d2c9be6e4b13f77bbe638bb8718eb1de;hb=1ffc9826ce017a0b6b9caa9ec30825240f14404c;hp=799560cbf72f68e4f126ea8b1b285893f3586643;hpb=d2efdbf3d4f583655ecbe5dba5163f32b1307582;p=config%2Fdotfiles.git

diff --git a/lib.sh b/lib.sh
index 799560c..da00cce 100644
--- a/lib.sh
+++ b/lib.sh
@@ -4,7 +4,7 @@
 
 
 # csh gives the error "Unknown colorls variable `su'." when used with newer
-# options supported by zsh or GNU ls.
+# options supported by Zsh or GNU ls.
 unset LS_COLORS
 
 
@@ -30,7 +30,7 @@ os() {
     fi
 }
 
-# Creates a symbolic link for file $1 in dirname of $2 with name of basenmae
+# Creates a symbolic link for file $1 in dirname of $2 with name of basename
 # $2.
 #
 # `./link.sh example ~/.examplerc` creates a symbolic link to example
@@ -80,7 +80,7 @@ warning() {
     echo "# It was generated from $2 on `date`." >> $1
     echo >> $1
 
-    # Display given options if there were any (zsh has a problem with $options
+    # Display given options if there were any (Zsh has a problem with $options
     # as variable name).
     option=
     if [ -n "$4" ]; then
@@ -99,9 +99,10 @@ warning() {
 # The following commands are possible; the file extension for the source file
 # in brackets.
 #
-# - m4  (.m4): pipe $2.m4 through m4 then write it to $2
-# - awk (.in): pipe $2.in through awk then write it to $2
-# - cat ($3):  copy $2$3 to $2
+# - m4   (.m4): pipe $2.m4 through m4 then write it to $2
+# - awk  (.in): pipe $2.in through awk then write it to $2
+# - perl (.in): pipe $2.in through perl then write it to $2
+# - cat  ($3):  copy $2$3 to $2
 generate() {
     # Get command and target file.
     command="$1"
@@ -114,7 +115,7 @@ generate() {
     # extension.
     if [ x"$command" = xm4 ]; then
         extension=.m4
-    elif [ x"$command" = xawk ]; then
+    elif [ x"$command" = xawk -o x"$command" = xperl ]; then
         extension=.in
     elif [ x"$command" = xcat ]; then
         extension="$1" # is $3 in reality, $1 because of shifting