Fix translations.

[elisp/gnus.git-] / lisp / gnus-group.el

diff --git a/lisp/gnus-group.el b/lisp/gnus-group.el
index b8eddb2..c7fbad9 100644 (file)
--- a/lisp/gnus-group.el
+++ b/lisp/gnus-group.el
@@ -1742,7 +1742,7 @@ If FIRST-TOO, the current line is also eligible as a target."
         (size (+ size-in-cache size-in-agent))
         (suffix '("B" "K" "M" "G"))
         (scale 1024.0)
-        (cutoff (* 10 scale)))
+        (cutoff scale))
     (while (> size cutoff)
       (setq size (/ size scale)
            suffix (cdr suffix)))
@@ -4394,7 +4394,7 @@ This command may read the active file."
 ;;;
 
 (defun gnus-group-compact-group (group)
-  "Conpact the current group.
+  "Compact the current group.
 Compaction means removing gaps between article numbers.  Hence, this
 operation is only meaningful for back ends using one file per article
 \(e.g. nnml).