Revert the gnus-replace-in-string change, fix arguments, reapply

[gnu-emacs] / lisp / gnus / gnus-group.el

diff --git a/lisp/gnus/gnus-group.el b/lisp/gnus/gnus-group.el
index 18e899b7bce61f30e917737e796818976f372060..b702e2f42ca4e133c235e1db28735bf530abc724 100644 (file)
--- a/lisp/gnus/gnus-group.el
+++ b/lisp/gnus/gnus-group.el
@@ -2197,7 +2197,7 @@ if it is not a list."
       (setq group
            (encode-coding-string
             group (gnus-group-name-charset nil group))))
-    (replace-regexp-in-string group "\n" "")))
+    (replace-regexp-in-string "\n" "" group)))
 
 ;;;###autoload
 (defun gnus-fetch-group (group &optional articles)
@@ -2456,8 +2456,8 @@ the bug number, and browsing the URL must return mbox output."
          (end-of-line)
          (insert (format ", %s@%s" (car ids)
                          (replace-regexp-in-string
-                          (replace-regexp-in-string mbox-url "^http://" "")
-                          "/.*$" ""))))))
+                          "/.*$" ""
+                          (replace-regexp-in-string "^http://" "" mbox-url)))))))
     (gnus-group-read-ephemeral-group
      (format "nndoc+ephemeral:bug#%s"
             (mapconcat 'number-to-string ids ","))