From c30495737dfeaf7e5e8b97834b7b7b55df761275 Mon Sep 17 00:00:00 2001
From: "Robert P. Goldman" <rpgoldman@real-time.com>
Date: Wed, 24 Feb 2010 15:07:18 -0600
Subject: [PATCH] Remove stray markdown in docstrings.

---
 asdf.lisp | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/asdf.lisp b/asdf.lisp
index 0061610c..04fb9c4c 100644
--- a/asdf.lisp
+++ b/asdf.lisp
@@ -1697,28 +1697,28 @@ created with the same initargs as the original one.
 "))
   (setf (documentation 'oos 'function)
         (format nil
-                "Short for _operate on system_ and an alias for the [operate][] function. ~&~&~a"
+                "Short for _operate on system_ and an alias for the OPERATE function. ~&~&~a"
                 operate-docstring))
   (setf (documentation 'operate 'function)
         operate-docstring))
 
 (defun load-system (system &rest args &key force (verbose t) version
                     &allow-other-keys)
-  "Shorthand for `(operate 'asdf:load-op system)`. See [operate][] for
+  "Shorthand for `(operate 'asdf:load-op system)`. See OPERATE for
 details."
   (declare (ignore force verbose version))
   (apply #'operate 'load-op system args))
 
 (defun compile-system (system &rest args &key force (verbose t) version
                        &allow-other-keys)
-  "Shorthand for `(operate 'asdf:compile-op system)`. See [operate][]
+  "Shorthand for `(operate 'asdf:compile-op system)`. See OPERATE
 for details."
   (declare (ignore force verbose version))
   (apply #'operate 'compile-op system args))
 
 (defun test-system (system &rest args &key force (verbose t) version
                     &allow-other-keys)
-  "Shorthand for `(operate 'asdf:test-op system)`. See [operate][] for
+  "Shorthand for `(operate 'asdf:test-op system)`. See OPERATE for
 details."
   (declare (ignore force verbose version))
   (apply #'operate 'test-op system args))
-- 
GitLab