Comment change.

lisp/ange-ftp.el

@@ -559,7 +559,7 @@
 ;;       Think nil as in "not a remote host". This value is used by
 ;;       ange-ftp-dired-host-type for local buffers.
 ;;
-;; t = a remote host of unknown type. Think t is in true, it's remote.
+;; t = a remote host of unknown type. Think t as in true, it's remote.
 ;;     Currently, 'unix is used as the default remote host type.
 ;;     Maybe we should use t.
 ;;

lisp/gnus-kill.el

@@ -504,7 +504,7 @@ COMMAND must be a lisp expression or a string representing a key sequence."
 	  (if (listp kill-list)
 	      ;; It is a list.
 	      (if (not (consp (cdr kill-list)))
-		  ;; It's on the form (regexp . date).
+		  ;; It's of the form (regexp . date).
 		  (if (zerop (gnus-execute field (car kill-list) 
 					   command nil (not all)))
 		      (if (> (gnus-days-between date (cdr kill-list))

lisp/hilit19.el

@@ -149,7 +149,7 @@
 ;;
 ;; * Moved hilit-wysiwyg-replace here from my version of man.el, this is not
 ;;   a bug.  The bug is that I don't have a reverse operation yet...just a
-;;   stub Wysiwyg-anything really belongs in a package of it's own.
+;;   stub Wysiwyg-anything really belongs in a package of its own.
 ;;
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;
@@ -204,7 +204,7 @@
 ;; changed references to default-bold-italic to just bold-italic because the
 ;;   font for that face is maintained by emacs.
 ;;
-;; the pattern matcher now starts it's searches from the end of the most
+;; the pattern matcher now starts its searches from the end of the most
 ;;   recently highlighted region (which is not necessarily the end of the most
 ;;   recently matched regex).
 ;;
@@ -265,7 +265,7 @@
 ;; documented another "known problem" to "head off gripe mail at the pass."
 ;;
 ;; Revision 2.3  1993/07/27  02:15:49  stig
-;; (hilit-lookup-face-create) incorporated patch which improves it's behavior
+;; (hilit-lookup-face-create) incorporated patch which improves its behavior
 ;; with more than one frame...  Still can't have bold on the same face in two
 ;; different fonts sizes at the same time...
 ;;
@@ -287,7 +287,7 @@
 ;; added hilit-parser-alist which can be used to apply different patterns to
 ;;   different parts of a buffer.  This could be integrated in a far more
 ;;   elegant manner, but it presently serves the purpose of not applying
-;;   message header patterns to message bodies in mail-mode and it's kin.
+;;   message header patterns to message bodies in mail-mode and its kin.
 ;; hilit-set-mode-patterns now takes a list of modes and an optional parse-fn
 ;;
 
@@ -921,7 +921,7 @@ the entire buffer is forced."
 ;;   (message "*sigh* hilit-wysiwyg-write-repair not implemented yet")
 ;;
 ;; For efficiency, this hook should copy the current buffer to a scratch
-;; buffer and do it's overstriking there.  Overlays are not copied, so it'll
+;; buffer and do its overstriking there.  Overlays are not copied, so it'll
 ;; be necessary to hop back and forth.  This is OK since you're not fiddling
 ;; with--making or deleting--any overlays.  THEN write the new buffer,
 ;; delete it, and RETURN T. << important

lisp/progmodes/cplus-md.el

@@ -353,11 +353,11 @@ no args if that value is non-nil."
     (save-excursion
       (skip-chars-backward " \t")
       (max
-       ;; leave at least one space on non-empty lines.
+       ;; Leave at least one space on non-empty lines.
        (if (zerop (current-column)) 0 (1+ (current-column)))
        (let ((cur-pt (point)))
 	 (beginning-of-line 0)
-	 ;; If previous line had a comment, use it's indent
+	 ;; If previous line had a comment, use its indentation.
 	 (if (re-search-forward comment-start-skip cur-pt t)
 	     (progn
 	       (goto-char (match-beginning 0))

lisp/rcompile.el

@@ -34,7 +34,7 @@
 ;; by the calling ange-ftp-ftp-name on the current directory. In this case the
 ;; next-error command will also ange-ftp the files over. This is achieved
 ;; automatically because the compilation-parse-errors function uses
-;; default-directory to build it's file names. If however the file visited was
+;; default-directory to build its file names. If however the file visited was
 ;; loaded locally, remote-compile prompts for a host and user and assumes the
 ;; files mounted locally (otherwise, how was the visited file loaded).
 

lisp/skeleton.el

@@ -170,7 +170,7 @@ ignored."
 	 (setq skeleton-abbrev-cleanup (point))
 	 (add-hook 'post-command-hook 'skeleton-abbrev-cleanup nil t))))
 
-;; This command isn't meant to be called, only it's aliases with meaningful
+;; This command isn't meant to be called, only its aliases with meaningful
 ;; names are.
 ;;;###autoload
 (defun skeleton-proxy (&optional str arg)

lisp/textmodes/ispell.el

@@ -212,7 +212,7 @@
 ;; lookup-words rehacked to use call-process (Jamie).
 ;; ispell-complete-word rehacked to be compatible with the rest of the
 ;; system for word searching and to include multiple wildcards,
-;; and it's own dictionary.
+;; and its own dictionary.
 ;; query-replace capability added.  New options 'X', 'R', and 'A'.
 ;; buffer-local modes for dictionary, word-spelling, and formatter-parsing.
 ;; Many random bugs, like commented comments being skipped, fix to

lisp/thingatpt.el

@@ -22,7 +22,7 @@
 
 ;; This file provides routines for getting the `thing' at the location of
 ;; point, whatever that `thing' happens to be.  The `thing' is defined by
-;; it's beginning and end positions in the buffer.
+;; its beginning and end positions in the buffer.
 ;;
 ;; The function bounds-of-thing-at-point finds the beginning and end
 ;; positions by moving first forward to the end of the `thing', and then