This file is indexed.

/etc/emacs/site-start.d/70x-face-el.el is in x-face-el 1.3.6.24-15.

This file is owned by root:root, with mode 0o644.

The actual contents of the file can be viewed below.

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
;;; 70x-face-el.el --- Debian x-face-el startup file  -*-mode: emacs-lisp;-*-

;;; Code:

(let* ((flavor-name (if (boundp 'debian-emacs-flavor)
			(symbol-name debian-emacs-flavor)
		      "emacs"))
       (elc-dir (concat "/usr/share/" flavor-name "/site-lisp/x-face-el")))
  (if (not (file-directory-p elc-dir))
      ()
    (if (fboundp 'debian-pkg-add-load-path-item)
	(debian-pkg-add-load-path-item elc-dir)
      (setq load-path (cons elc-dir load-path)))
    (setq x-face-inhibit-loadup-splash t)
    (setq x-face-viewer-program "display")
    (setq x-face-viewer-options '("-geometry" "+0+0" "-"))
    (cond
     ((and (not (featurep 'xemacs))
	   (boundp 'emacs-major-version)
	   (>= emacs-major-version 21))
      (autoload 'x-face-ascii-view "x-face-e21" nil t))
     (t
      (autoload 'x-face-ascii-view "x-face"
	"View X-Face fields as ascii pictures." t)))
    (if (not window-system)
	()
      (cond
       ((and (not (featurep 'xemacs))
	     (boundp 'emacs-major-version)
	     (>= emacs-major-version 21))
	(autoload 'x-face-decode-message-header "x-face-e21")
	(autoload 'x-face-insert "x-face-e21" nil t)
	(autoload 'x-face-save "x-face-e21" nil t)
	(autoload 'x-face-show "x-face-e21" nil t)
	(autoload 'x-face-turn-off "x-face-e21")
	(setq x-face-auto-image t)
	;; for RMAIL
	(add-hook 'rmail-show-message-hook 'x-face-decode-message-header)
	;; for mh-e
	(add-hook 'mh-show-mode-hook 'x-face-decode-message-header)
	;; for SEMI
	(add-hook 'mime-display-header-hook 'x-face-decode-message-header)
	(add-hook 'mime-edit-translate-hook 'x-face-turn-off)
	;; for Wanderlust
	(setq wl-highlight-x-face-function 'x-face-decode-message-header)
	;; for Mew
	(setq mew-use-highlight-x-face t)
	(setq mew-highlight-x-face-function 'x-face-decode-message-header)
	(setq mew-use-highlight-x-face-function mew-highlight-x-face-function)
	(setq mew-opt-highlight-x-face-function mew-highlight-x-face-function)
	(add-hook 'mew-make-message-hook 'x-face-turn-off)
	;;
	)
       (t
	(autoload 'x-face-encode "x-face"
	  "Generate X-Face string(s) from xbm file." t)
	(autoload 'x-face-insert "x-face"
	  "Insert X-Face fields." t)
	(autoload 'x-face-save "x-face"
	  "Save X-Face fields to files." t)
	(autoload 'x-face-view "x-face"
	  "View X-Face fields." t)
	(autoload 'x-face-menu-insert "x-face" "Insert X-Face with menu." t)
	(autoload 'x-face-menu-encode "x-face"
	  "Generate X-Face string(s) from xbm file with menu." t)
	(if (not (featurep 'xemacs))
	    ()
	  (autoload 'x-face-xmas-display-x-face "x-face"
	    "Display X-Face fields as XEmacs-glyph." t)
	  (autoload 'x-face-xmas-force-display-x-face "x-face"
	    "Display X-Face fields compulsorily as XEmacs glyph." t)
	  (autoload 'x-face-xmas-remove-x-face-glyph "x-face"
	    "Remove X-Face images and some text-properties." t)
	  ;; for Gnus
	  (setq gnus-article-x-face-command 'x-face-xmas-display-x-face)
	  ;; for SEMI
	  (require 'x-face)
	  (x-face-xmas-replace-highlight-headers)
	  (x-face-xmas-replace-x-face-function-for-semi)
	  (add-hook 'mime-edit-translate-hook 'x-face-xmas-remove-x-face-glyph)
	  ;; for Wanderlust
	  (autoload 'x-face-xmas-wl-display-x-face "x-face" nil t)
	  (setq wl-highlight-x-face-function 'x-face-xmas-wl-display-x-face)
	  ;; for Mew
	  (autoload 'x-face-xmas-mew-display-x-face "x-face")
	  (setq mew-highlight-x-face-function 'x-face-xmas-mew-display-x-face)
	  (setq mew-use-highlight-x-face-function mew-highlight-x-face-function)
	  (setq mew-opt-highlight-x-face-function mew-highlight-x-face-function)
	  ;;
	  ))))
    ;;
    ))

;;; 70x-face-el.el ends here