                  (thing-at-point 'filename) ) ))
     (if (string-match-p "\\`https?://" path)
         (browse-url path)
-      (progn ; not starting “http://”
+      (progn ; not starting 'http:'
         (if (file-exists-p path)
             (find-file path)
           (if (file-exists-p (concat path ".el"))
               (find-file (concat path ".el"))
-            (when (y-or-n-p (format "file doesn't exist: 「%s」. Create?" path) )
+            (when (y-or-n-p (format "file doesn't exist: '%s'. Create?" path) )
               (find-file path )) ) ) ) ) ))
 
 

to the end of code.

Example:
  (serious |code here)1 ;; useless commend2

In the example, | is the current point, 1 is the position of
point after one invocation of this funciton, 2 is position after
repeated invocation. On subsequent calls the point jumps between
1 and 2.


(defun open-file-at-cursor ()
  "Open the file path under cursor.
If there is text selection, uses the text selection for path.
If the path is starts with 'http:', open the URL in browser.
Input path can be {relative, full path, URL}.
This command is similar to `find-file-at-point' but without prompting for confirmation.
"
