bug#6695: 24.0.50; thing-at-point-url-at-point and ffap-guesser problem

[Drew Adams]

emacs -Q
 
Load thingatpt.el and ffap.el.  Use this test line of text:
 
;; c:/Documents and Settings/foobar/My Documents/MyStuff/foo.pdf
 
1. Put the cursor on the g of Settings.
   M-: (thing-at-point-url-at-point) => "http://Settings/foobar/My";
 
2. Put the cursor on the S of MyStuff.
   M-: (thing-at-point-url-at-point) =>
   "http://Documents/MyStuff/foo.pdf";
 
Neither of those is remotely correct.
 
3. Put the cursor on the g of Settings.
   M-: (ffap-guesser) => nil
 
   Same thing with cursor *anywhere* on the absolute file name, except:
   If the cursor is on any character in this string: "c:/Documents" then
   (ffap-guesser) returns "c:/Documents and Settings/" (which is also
   wrong).
 
What should happen:
 
`ffap-guesser' should return
"c:/Documents and Settings/foobar/My Documents/MyStuff/foo.pdf"
 
`thing-at-point-url-at-point should return
"http://c:/Documents and Settings/foobar/My Documents/MyStuff/foo.pdf"
 

In GNU Emacs 24.0.50.1 (i386-mingw-nt5.1.2600)
 of 2010-07-19 on 3249CTO
Windowing system distributor `Microsoft Corp.', version 5.1.2600
configured using `configure --with-gcc (4.4) --no-opt --cflags -Ic:/xpm/include'