Fix typos in comments.

diff --git a/src/insdel.c b/src/insdel.c
index f94f4f0..eaf899c 100644 (file)
--- a/src/insdel.c
+++ b/src/insdel.c
@@ -199,7 +199,7 @@ gap_left (EMACS_INT charpos, EMACS_INT bytepos, int newgap)
   QUIT;
 }
 
-/* Move the gap to a position greater than than the current GPT.
+/* Move the gap to a position greater than the current GPT.
    BYTEPOS describes the new position as a byte position,
    and CHARPOS is the corresponding char position.  */
 

diff --git a/src/regex.c b/src/regex.c
index 91259dc..944ef4e 100644 (file)
--- a/src/regex.c
+++ b/src/regex.c
@@ -2400,7 +2400,7 @@ set_image_of_range_1 (work_area, start, end, translate)
 
 #endif /* emacs */
 
-/* Record the the image of the range start..end when passed through
+/* Record the image of the range start..end when passed through
    TRANSLATE.  This is not necessarily TRANSLATE(start)..TRANSLATE(end)
    and is not even necessarily contiguous.
    Normally we approximate it with the smallest contiguous range that contains

diff --git a/src/syntax.c b/src/syntax.c
index 6fa20c4..d84e62e 100644 (file)
--- a/src/syntax.c
+++ b/src/syntax.c
@@ -341,7 +341,7 @@ dec_bytepos (bytepos)
   return bytepos;
 }
 \f
-/* Return a defun-start position before before POS and not too far before.
+/* Return a defun-start position before POS and not too far before.
    It should be the last one before POS, or nearly the last.
 
    When open_paren_in_column_0_is_defun_start is nonzero,

diff --git a/src/term.c b/src/term.c
index 0d00957..d5855b4 100644 (file)
--- a/src/term.c
+++ b/src/term.c
@@ -1808,8 +1808,8 @@ append_composite_glyph (it)
 
 /* Produce a composite glyph for iterator IT.  IT->cmp_id is the ID of
    the composition.  We simply produces components of the composition
-   assuming that that the terminal has a capability to layout/render
-   it correctly.  */
+   assuming that the terminal has a capability to layout/render it
+   correctly.  */
 
 static void
 produce_composite_glyph (it)

diff --git a/src/unexec.c b/src/unexec.c
index 676197b..a6852af 100644 (file)
--- a/src/unexec.c
+++ b/src/unexec.c
@@ -498,7 +498,7 @@ write_segment (new, ptr, end)
          )
        {
          /* Write only a page of zeros at once,
-            so that we we don't overshoot the start
+            so that we don't overshoot the start
             of the valid memory in the old data segment.  */
          if (nwrite > pagesize)
            nwrite = pagesize;

diff --git a/src/xdisp.c b/src/xdisp.c
index 017d4ce..07a2127 100644 (file)
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -22711,7 +22711,7 @@ x_update_cursor (f, on_p)
 /* EXPORT:
    Clear the cursor of window W to background color, and mark the
    cursor as not shown.  This is used when the text where the cursor
-   is is about to be rewritten.  */
+   is about to be rewritten.  */
 
 void
 x_clear_cursor (w)

diff --git a/src/xfns.c b/src/xfns.c
index 49a9c50..87ff21b 100644 (file)
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -2953,7 +2953,7 @@ x_make_gc (f)
 }
 
 
-/* Free what was was allocated in x_make_gc.  */
+/* Free what was allocated in x_make_gc.  */
 
 void
 x_free_gcs (f)