Rename .l(, .l) to .(l, .)l

This fits better with established practice (see the me macros).

2 files changed, 5 insertions, 5 deletions

diff --git a/list/list b/list/list
index 11ec7c1..c3933e4 100755
--- a/list/list
+++ b/list/list
@@ -9,12 +9,12 @@
 use Getopt::Std;
 BEGIN { getopt('Ep:s:') }
 
-if (/^\.\s*l\(\s*$/ .. /^\.\s*l\)\s*$/) {
+if (/^\.\s*\(l\s*$/ .. /^\.\s*\)l\s*$/) {
 	not $opt_E and s/^\\!// and next;
-	if (/^\.\s*l\(\s*$/) {
+	if (/^\.\s*\(l\s*$/) {
 		$_ = '';
 		$_ = "$opt_p\n" if $opt_p;
-	} elsif (/^\.\s*l\)\s*$/) {
+	} elsif (/^\.\s*\)l\s*$/) {
 		$_ = '';
 		$_ = "$opt_s\n" if $opt_s;
 	} else {
diff --git a/list/list.1 b/list/list.1
index 02a89d8..019c738 100644
--- a/list/list.1
+++ b/list/list.1
@@ -15,9 +15,9 @@
 .Pp
 .Nm
 escapes text between
-.Ql .l(
+.Ql .(l
 and
-.Ql .l)
+.Ql .)l
 lines for
 .Xr troff 1 .
 .Pp