Some fixes to follow coding conventions in files maintained by FSF.
[bpt/emacs.git] / lisp / soundex.el
index 253a023..89094e3 100644 (file)
@@ -1,4 +1,4 @@
-;;; soundex.el -- implement Soundex algorithm
+;;; soundex.el --- implement Soundex algorithm
 
 ;; Copyright (C) 1993 Free Software Foundation, Inc.
 
@@ -29,7 +29,7 @@
 ;; The Soundex algorithm maps English words into representations of
 ;; how they sound.  Words with vaguely similar sound map to the same string.
 
-;;; Code: 
+;;; Code:
 
 (defvar soundex-alist
   '((?B . "1") (?F . "1") (?P . "1") (?V . "1")
@@ -71,4 +71,6 @@ and Searching\", Addison-Wesley (1973), pp. 391-392."
 ;("E460" "G200" "H416" "K530" "L300" "L222"
 ; "E460" "G200" "H416" "K530" "L300" "L222")
 
-;; soundex.el ends here
+(provide 'soundex)
+
+;;; soundex.el ends here