   :type '(choice (const nil) (const t) (const absolute))
   :group 'helm-etags+)
 
+(defcustom helm-etags+-follow-symlink-p t
+  "see issue #9,maybe you should set `find-file-visit-truename' to nil,
+   if you set this to nil"
+  :type 'boolean
+  :group 'helm-etags+)
+
 (defcustom helm-etags+-filename-location 'filename-after-dir
   "display src filename after src file name parent dir or not."
   :type '(choice (const filename-before-dir) (const filename-after-dir))

            (setq tag-line (replace-regexp-in-string  "\t" (make-string tab-width ? ) tag-line))
            (end-of-line)
            ;;(setq src-file-name (etags-file-of-tag))
            (setq src-file-name   (file-truename (etags-file-of-tag)))
            (let ((display)(real (list  src-file-name tag-info full-tagname))
                  (src-location-display (file-name-nondirectory src-file-name)))
              (cond
               ((equal helm-etags+-use-short-file-name nil)
                (let ((tag-table-parent (file-truename (file-name-directory (buffer-file-name tag-table-buffer))))
                      (src-file-parent (file-name-directory src-file-name)))
                  (when (string-match  (regexp-quote tag-table-parent) src-file-name)
                    (if (equal 'filename-after-dir helm-etags+-filename-location)

;;; helm-etags+.el --- Another Etags helm.el interface

;; Created: 2011-02-23
;; Last Updated: 纪秀峰 2014-03-08 13:26:18
;; Version: 0.2.1
;; Author: 纪秀峰(Joseph) <jixiuf@gmail.com>
;; Copyright (C) 2011~2012, 纪秀峰(Joseph), all rights reserved.
;; URL       :https://github.com/jixiuf/helm-etags-plus
