-;; Time-stamp: <2017-03-17 18:19:08 kmodi>
+;; Time-stamp: <2016-08-05 11:00:55 kmodi>
 
 (>=e "25.0"
     (setq fast-but-imprecise-scrolling t))

                      (skip-chars-forward (car args))
                      (skip-chars-backward (nth 2 args) pt)
                      (point))))
             (region-len (- (max beg end) (min beg end))))

        ;; If the initial characters of the to-be-returned string are the
        ;; current major mode's comment starter characters, *and* are
        ;; not part of a comment, remove those from the returned string
        ;; (Bug#24057).
        ;; Example comments in `c-mode' (which considers lines beginning
        ;; with "//" as comments):
        ;;  //tmp - This is a comment. It does not contain any path reference.
        ;;  ///tmp - This is a comment. The "/tmp" portion in that is a path.
        ;;  ////tmp - This is a comment. The "//tmp" portion in that is a path.

| ▮// //tmp                         | (empty string) \"\"             |
| // ▮/tmp                          | /tmp                            |
| // ▮//tmp                         | //tmp                           |
|-----------------------------------+---------------------------------| "
      (let* ((args
              (cdr
               (or (assq (or mode major-mode) ffap-string-at-point-mode-alist)
