]> git.eshelyaron.com Git - emacs.git/commitdiff
Revert "Improve docstrings auto-generated by `define-minor-mode'"
authorJuanma Barranquero <lekktu@gmail.com>
Fri, 4 Oct 2019 12:02:13 +0000 (14:02 +0200)
committerJuanma Barranquero <lekktu@gmail.com>
Fri, 4 Oct 2019 12:03:11 +0000 (14:03 +0200)
This reverts commit a397fa06d18d6ae37a3a1288f269e1ae9eb3b569.
The original change breaks bootstrapping because of a circular dependency.

lisp/emacs-lisp/easy-mmode.el

index 6d5b5141aaf161b3310213eb54475bb3e645b50f..5e7b29eddf8b2cec9396fc6af055afb031758046 100644 (file)
@@ -95,17 +95,11 @@ if ARG is `toggle'; disable the mode otherwise.")
 \\{%s}" mode-pretty-name keymap-sym))))
     (if (string-match-p "\\bARG\\b" doc)
         doc
-      (let* ((fill-prefix nil)
-             (docstring-fc (bound-and-true-p emacs-lisp-docstring-fill-column))
-             (fill-column (if (integerp docstring-fc) docstring-fc 65))
-             (argdoc (format easy-mmode--arg-docstring
-                             mode-pretty-name)))
-        (with-temp-buffer
-          (insert (replace-regexp-in-string "\\(\n\n\\|\\'\\)\\(.\\|\n\\)*\\'"
-                                            (concat argdoc "\\1")
-                                            doc nil nil 1))
-          (fill-region (point-min) (point-max) 'left t)
-          (buffer-string))))))
+      (let ((argdoc (format easy-mmode--arg-docstring
+                            mode-pretty-name)))
+        (replace-regexp-in-string "\\(\n\n\\|\\'\\)\\(.\\|\n\\)*\\'"
+                                  (concat argdoc "\\1")
+                                  doc nil nil 1)))))
 
 ;;;###autoload
 (defalias 'easy-mmode-define-minor-mode 'define-minor-mode)