Fix miscellaneous typos in comments.

fish/tilde.c

@@ -75,7 +75,7 @@ try_tilde_expansion (char *str)
     }
   }
 
-  /* No match, return the orignal string. */
+  /* No match, return the original string. */
   return str;
 }
 

generator/perl.ml

@@ -344,7 +344,7 @@ PREINIT:
        | RStringList _
        | RStruct _ | RStructList _
        | RHashtable _ ->
-           pr "void\n" (* all lists returned implictly on the stack *)
+           pr "void\n" (* all lists returned implicitly on the stack *)
       );
       (* Call and arguments. *)
       pr "%s (g" name;

resize/virt-resize.pod

@@ -811,7 +811,7 @@ expand that type of filesystem.
 In both cases, virt-resize will not expand the mentioned filesystem;
 the result (unless I<--unknown-filesystems error> is specified)
 is that the partitions containing such filesystems will be actually
-bigger as requested, but the filesystems will still be usable at the
+bigger as requested, but the filesystems will still be usable at
 their older sizes.
 
 =head1 ALTERNATIVE TOOLS

v2v/linux.mli

@@ -24,7 +24,7 @@ val augeas_reload : Guestfs.guestfs -> unit
     that augeas found. *)
 
 val install_local: Guestfs.guestfs -> Types.inspect -> string list -> unit
-(** Install pacakge(s). *)
+(** Install package(s). *)
 
 val remove : Guestfs.guestfs -> Types.inspect -> string list -> unit
 (** Uninstall package(s). *)

v2v/parse_ova.ml

@@ -420,7 +420,7 @@ let get_tar_offet_and_size tar filename =
               with Failure _ ->
                 failwithf (f_"invalid size returned by tar: %S") size in
 
-            (* Note: Offset is actualy block number and there is a single
+            (* Note: Offset is actually block number and there is a single
              * block with tar header at the beginning of the file. So skip
              * the header and convert the block number to bytes before
              * returning.