Added L status.

diff --git a/src b/src
index 0e8ce3fdcb51c71a5db4f01249fab973b49bbb00..1be6ae8719739fa75308a7cf0f2d9aa32f84f26f 100755 (executable)
--- a/src
+++ b/src
@@ -307,7 +307,8 @@ src checkout ['revision'] ['file'...]
 
 src status ['file'...]
    A = added, U = unmodified, M = modified, ! = missing, ? = not tracked,
-   I = ignored.
+   I = ignored, L = locked (recover with src checkout).  The L
+   status should only occur if you have used RCS directly on a file.
 
 src cat [revision-range] ['file'...]
    Send the specified revisions of the files to standard output.
@@ -577,6 +578,8 @@ def status_method(*args):
             pairs.append((fn, "M"))
         elif not backend.has_revisions(fn):
             pairs.append((fn, "A"))
+        elif not os.access(fn, os.W_OK):
+            pairs.append((fn, "L"))
         else:
             pairs.append((fn, "U"))
     if not args:
@@ -744,7 +747,7 @@ def copy_method(*args):
 
 def release_method(*args):
     "Release locks."
-    (revspec, args) = preamble(legend, args)
+    (revspec, args) = preamble("release", args)
     if revspec is not None:
         croak("release doesn't take a revision spec")
     for arg in args:

diff --git a/src.asc b/src.asc
index e6af113efaae981669fec5d4a88f3bc8fda55c94..83a1dc7c637982c70d2ef6b76257448b98a59d68 100644 (file)
--- a/src.asc
+++ b/src.asc
@@ -60,7 +60,8 @@ src checkout [revision] ['file'...]::
 
 src status ['file'...]::
    A = added, U = unmodified, M = modified, ! = missing, ? = not tracked,
-   I = ignored.
+   I = ignored, L = locked (recover with src checkout).  The L
+   status should only occur if you have used RCS directly on a file.
 
 src cat [revision-range] ['file'...]::
    Send the specified revisions of the files to standard output.