OSDN Git Service

fix bug: with GAST_CONTENT_WITHOUT_H but have no perl, backslash was deleted.
authorTadashi Koike <t-koike@users.sourceforge.jp>
Sat, 31 Oct 2009 14:01:07 +0000 (23:01 +0900)
committerTadashi Koike <t-koike@users.sourceforge.jp>
Sat, 31 Oct 2009 14:01:07 +0000 (23:01 +0900)
gast

diff --git a/gast b/gast
index 44d58d7..d8229b6 100755 (executable)
--- a/gast
+++ b/gast
@@ -307,7 +307,7 @@ while (<>) {
             fname="$1"
             IFS_SAVE=$IFS
             IFS=
-            while read line
+            while read -r line
             do
                 if [[ "${line}" =~ "^#[ \t]+([0-9]+)[ \t]+\"([^\"]+)\".*$" ]]; then
                     line_no=${BASH_REMATCH[1]}
@@ -344,7 +344,7 @@ while (<>) {
             prnt_flg=0
             IFS_SAVE=$IFS
             IFS=
-            while read line
+            while read -r line
             do
                 if [ "${prnt_flg}" -ne 0 ]; then
                     echo "${line}"