# HG changeset patch
# User jwe
# Date 1191434343 0
# Node ID 88df962dc2961b08faa3a0b0633378ad1fb33ae8
# Parent  755222bd2dbfa71d9c234f99e35741e2ed7410bb
[project @ 2007-10-03 17:59:03 by jwe]

diff --git a/libcruft/ChangeLog b/libcruft/ChangeLog
--- a/libcruft/ChangeLog
+++ b/libcruft/ChangeLog
@@ -1,3 +1,7 @@
+2007-10-03  John W. Eaton  <jwe@octave.org>
+
+	* mkf77def.in: Combine sed expressions.
+
 2007-09-26  David Bateman  <dbateman@free.fr>
 
 	* lapack/dgelsy.f,  lapack/dlatrz.f,  lapack/zlarz.f,
diff --git a/libcruft/mkf77def.in b/libcruft/mkf77def.in
--- a/libcruft/mkf77def.in
+++ b/libcruft/mkf77def.in
@@ -25,7 +25,4 @@
   awkcmd="$AWK '{ printf (\"%s%s\n\", tolower (\$0), \"$uscore\"); }'"
 fi
 
-$SED -n \
-  -e 'y/ABCDEFGHIJLKMNOPQRSTUVWXYZ/abcdefghijlkmnopqrstuvwxyz/' \
-  -e 's/^\(      \|	\)[ 	]*\(.*function\|subroutine\|entry\)[ 	]*\([^ 	(]*\).*$/\3/p' | \
-  eval $awkcmd
+$SED -n -e 'y/ABCDEFGHIJLKMNOPQRSTUVWXYZ/abcdefghijlkmnopqrstuvwxyz/; s/^\(      \|	\)[ 	]*\(.*function\|subroutine\|entry\)[ 	]*\([^ 	(]*\).*$/\3/p' | eval $awkcmd