ed: make wq shortcut work again (#790)

* Previously typing wq was supported, but recent changes in edParse() broke it
* Command suffix processing goes before check for a space, then optional filename argument
* This time document wq in pod

Author: mknos

bin/ed

@@ -951,6 +951,11 @@ sub edParse {
     }
     if (s/\A([acdEefHhijlmnPpQqrstWw=\!])//) { # optional argument
         $command = $1;
+        if ($command eq 'W' || $command eq 'w') {
+            if (s/\A[Qq]//) {
+                $commandsuf = 'q';
+            }
+        }
         if ($WANT_FILE{$command} && m/\A\S/) {
             return 0; # space before filename
         }
@@ -1303,6 +1308,10 @@ Write buffer to file in append mode
 
 Write buffer to file
 
+=item wq [FILE]
+
+Write buffer to file, then quit
+
 =item =
 
 Display current line number