(url-http-mark-connection-as-free, url-http-find-free-connection):

[gnu-emacs] / lisp / soundex.el

diff --git a/lisp/soundex.el b/lisp/soundex.el
index 253a02315bd2aed28bada37d72e7d9a97e1384b2..e48dbcf3bd6752b771e189d636afa9c93e94e14d 100644 (file)
--- a/lisp/soundex.el
+++ b/lisp/soundex.el
@@ -1,9 +1,10 @@
-;;; soundex.el -- implement Soundex algorithm
+;;; soundex.el --- implement Soundex algorithm
 
-;; Copyright (C) 1993 Free Software Foundation, Inc.
+;; Copyright (C) 1993, 2002, 2003, 2004, 2005,
+;;   2006 Free Software Foundation, Inc.
 
 ;; Author: Christian Plaunt <chris@bliss.berkeley.edu>
-;; Maintainer: FSF 
+;; Maintainer: FSF
 ;; Keywords: matching
 ;; Created: Sat May 15 14:48:18 1993
 
@@ -21,15 +22,15 @@
 
 ;; You should have received a copy of the GNU General Public License
 ;; along with GNU Emacs; see the file COPYING.  If not, write to the
-;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-;; Boston, MA 02111-1307, USA.
+;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+;; Boston, MA 02110-1301, USA.
 
 ;;; Commentary:
 
 ;; 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 +72,7 @@ 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)
+
+;;; arch-tag: b2615a98-feb7-430e-a717-171086738953
+;;; soundex.el ends here