One of the web pages mentioned in dmetaphone.c has moved.  Also fix
a few typos in comments.

The dictionaries I checked list "altho" as a variant of "although,"
but I didn't find any other instances of the former in the source
tree so I changed it.

-- 
Michael Fuhr
Index: contrib/fuzzystrmatch/dmetaphone.c
===================================================================
RCS file: /projects/cvsroot/pgsql/contrib/fuzzystrmatch/dmetaphone.c,v
retrieving revision 1.4
diff -c -r1.4 dmetaphone.c
*** contrib/fuzzystrmatch/dmetaphone.c  7 Oct 2004 15:21:49 -0000       1.4
--- contrib/fuzzystrmatch/dmetaphone.c  30 Sep 2005 21:12:42 -0000
***************
*** 6,16 ****
   * especially they can be a bit different, depending on pronunciation.
   *
   * Information on using Double Metaphone can be found at
!  *     http://www.codeproject.com/useritems/dmetaphone1.asp
   * and the original article describing it can be found at
   *     http://www.cuj.com/documents/s=8038/cuj0006philips/
   *
!  * For PostgrSQL we provide 2 functions - one for the primary and one for
   * the alternate. That way the functions are pure text->text mappings that
   * are useful in functional indexes. These are 'dmetaphone' for the
   * primary and 'dmetaphone_alt' for the alternate.
--- 6,16 ----
   * especially they can be a bit different, depending on pronunciation.
   *
   * Information on using Double Metaphone can be found at
!  *     http://www.codeproject.com/string/dmetaphone1.asp
   * and the original article describing it can be found at
   *     http://www.cuj.com/documents/s=8038/cuj0006philips/
   *
!  * For PostgreSQL we provide 2 functions - one for the primary and one for
   * the alternate. That way the functions are pure text->text mappings that
   * are useful in functional indexes. These are 'dmetaphone' for the
   * primary and 'dmetaphone_alt' for the alternate.
***************
*** 252,258 ****
  
  
  
! /* this typedef was orignally in the perl module's .h file */
  
  typedef struct
  {
--- 252,258 ----
  
  
  
! /* this typedef was originally in the perl module's .h file */
  
  typedef struct
  {
***************
*** 1188,1194 ****
                                /*
                                 * german & anglicisations, e.g. 'smith' match 
'schmidt',
                                 * 'snider' match 'schneider' also, -sz- in 
slavic
!                                * language altho in hungarian it is pronounced 
's'
                                 */
                                if (((current == 0)
                                         && StringAt(original, (current + 1), 1,
--- 1188,1194 ----
                                /*
                                 * german & anglicisations, e.g. 'smith' match 
'schmidt',
                                 * 'snider' match 'schneider' also, -sz- in 
slavic
!                                * language although in hungarian it is 
pronounced 's'
                                 */
                                if (((current == 0)
                                         && StringAt(original, (current + 1), 1,
Index: contrib/fuzzystrmatch/fuzzystrmatch.c
===================================================================
RCS file: /projects/cvsroot/pgsql/contrib/fuzzystrmatch/fuzzystrmatch.c,v
retrieving revision 1.15
diff -c -r1.15 fuzzystrmatch.c
*** contrib/fuzzystrmatch/fuzzystrmatch.c       26 Jan 2005 08:04:04 -0000      
1.15
--- contrib/fuzzystrmatch/fuzzystrmatch.c       30 Sep 2005 21:12:42 -0000
***************
*** 119,125 ****
        str_s0 = str_s;
  
        /*
!        * Loop throught the rows, starting at row 1. Row 0 is used for the
         * initial "upper" row.
         */
        for (j = 1; j < rows; j++)
--- 119,125 ----
        str_s0 = str_s;
  
        /*
!        * Loop through the rows, starting at row 1. Row 0 is used for the
         * initial "upper" row.
         */
        for (j = 1; j < rows; j++)
---------------------------(end of broadcast)---------------------------
TIP 9: In versions below 8.0, the planner will ignore your desire to
       choose an index scan if your joining column's datatypes do not
       match

Reply via email to