This file is indexed.

/usr/share/guile-gnome-2/gnome/gw/canvas.scm is in guile-gnome2-canvas 2.16.2-2.

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
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
;; Generated by G-Wrap: an experimental Guile C API-wrapper engine.
;; Customized by guile-gnome; see (gnome gw support g-wrap) for details.
(define-module
  (gnome gw canvas)
  #:use-module
  (oop goops)
  #:use-module
  (gnome gobject)
  #:use-module
  (gnome gw support modules)
  #:use-module
  (g-wrap gw standard)
  #:use-module
  (gnome gw glib)
  #:use-module
  (gnome gw gobject)
  #:use-module
  (gnome gw gdk)
  #:use-module
  (gnome gw gtk))
(eval-when
  (eval load compile)
  (load-extension
    "libgw-guile-gnome-canvas"
    "gw_init_wrapset_gnome_canvas"))
(export-all-lazy!
  '(gnome-canvas-update-bbox
     gnome-canvas-item-reset-bounds
     gnome-canvas-polygon-to-point
     gnome-canvas-get-butt-points
     gnome-canvas-get-miter-points
     gnome-canvas-shape-get-path-def
     gnome-canvas-shape-set-path-def
     gnome-canvas-rich-text-get-iter-at-location
     gnome-canvas-rich-text-get-iter-location
     gnome-canvas-rich-text-get-buffer
     gnome-canvas-rich-text-set-buffer
     gnome-canvas-rich-text-paste-clipboard
     gnome-canvas-rich-text-copy-clipboard
     gnome-canvas-rich-text-cut-clipboard
     gnome-canvas-path-def-all-closed
     gnome-canvas-path-def-any-closed
     gnome-canvas-path-def-all-open
     gnome-canvas-path-def-any-open
     gnome-canvas-path-def-has-currentpoint
     gnome-canvas-path-def-is-empty
     gnome-canvas-path-def-length
     gnome-canvas-path-def-closepath-current
     gnome-canvas-path-def-closepath
     gnome-canvas-path-def-curveto
     gnome-canvas-path-def-lineto-moving
     gnome-canvas-path-def-lineto
     gnome-canvas-path-def-moveto
     gnome-canvas-path-def-reset
     gnome-canvas-path-def-close-all
     gnome-canvas-path-def-closed-parts
     gnome-canvas-path-def-open-parts
     gnome-canvas-path-def-duplicate
     gnome-canvas-path-def-ensure-space
     gnome-canvas-path-def-finish
     gnome-canvas-path-def-new-sized
     gnome-canvas-path-def-new
     gnome-canvas-get-dither
     gnome-canvas-set-dither
     gnome-canvas-set-stipple-origin
     gnome-canvas-get-color-pixel
     gnome-canvas-get-color
     gnome-canvas-world-to-window
     gnome-canvas-window-to-world
     gnome-canvas-c2w
     gnome-canvas-w2c-d
     gnome-canvas-w2c
     gnome-canvas-request-redraw
     gnome-canvas-get-item-at
     gnome-canvas-update-now
     gnome-canvas-get-scroll-offsets
     gnome-canvas-scroll-to
     gnome-canvas-set-pixels-per-unit
     gnome-canvas-get-center-scroll-region
     gnome-canvas-set-center-scroll-region
     gnome-canvas-set-scroll-region
     gnome-canvas-root
     gnome-canvas-new
     gnome-canvas-item-request-update
     gnome-canvas-item-get-bounds
     gnome-canvas-item-grab-focus
     gnome-canvas-item-reparent
     gnome-canvas-item-i2w
     gnome-canvas-item-w2i
     gnome-canvas-item-ungrab
     gnome-canvas-item-grab
     gnome-canvas-item-hide
     gnome-canvas-item-show
     gnome-canvas-item-lower-to-bottom
     gnome-canvas-item-raise-to-top
     gnome-canvas-item-lower
     gnome-canvas-item-raise
     gnome-canvas-item-move
     gnome-canvas-path-def-split
     gnome-canvas-get-scroll-region
     gnome-canvas-path-def-concat
     gnome-canvas-new-aa
     gnome-canvas-item-affine-relative
     gnome-canvas-item-affine-absolute
     <gnome-canvas-path-def>
     <gnome-canvas-widget>
     <gnome-canvas-text>
     <gnome-canvas-bpath>
     <gnome-canvas-polygon>
     <gnome-canvas-ellipse>
     <gnome-canvas-rect>
     <gnome-canvas-re>
     <gnome-canvas-shape>
     <gnome-canvas-rich-text>
     <gnome-canvas-pixbuf>
     <gnome-canvas-line>
     <gnome-canvas-clipgroup>
     <gnome-canvas-group>
     <gnome-canvas-item>
     <gnome-canvas>
     <gnome-canvas-points>))
(begin
  (%gw:procedure->method-public
    gnome-canvas-world-to-window
    '(<gnome-canvas> <real> <real> <real> <real>)
    'world-to-window
    3
    #f)
  (%gw:procedure->method-public
    gnome-canvas-window-to-world
    '(<gnome-canvas> <real> <real> <real> <real>)
    'window-to-world
    3
    #f)
  (%gw:procedure->method-public
    gnome-canvas-c2w
    '(<gnome-canvas>
       <integer>
       <integer>
       <real>
       <real>)
    'c2w
    3
    #f)
  (%gw:procedure->method-public
    gnome-canvas-w2c-d
    '(<gnome-canvas> <real> <real> <real> <real>)
    'w2c-d
    3
    #f)
  (%gw:procedure->method-public
    gnome-canvas-w2c
    '(<gnome-canvas>
       <real>
       <real>
       <integer>
       <integer>)
    'w2c
    3
    #f)
  (%gw:procedure->method-public
    gnome-canvas-get-scroll-offsets
    '(<gnome-canvas> <integer> <integer>)
    'get-scroll-offsets
    1
    #f)
  (%gw:procedure->method-public
    gnome-canvas-item-get-bounds
    '(<gnome-canvas-item> <real> <real> <real> <real>)
    'get-bounds
    1
    #f)
  (%gw:procedure->method-public
    gnome-canvas-item-i2w
    '(<gnome-canvas-item> <real> <real>)
    'i2w
    1
    #f)
  (%gw:procedure->method-public
    gnome-canvas-item-w2i
    '(<gnome-canvas-item> <real> <real>)
    'w2i
    1
    #f)
  (%gw:procedure->method-public
    gnome-canvas-get-scroll-region
    '(<gnome-canvas> <real> <real> <real> <real>)
    'get-scroll-region
    1
    #f))
(if (defined? '%generics)
  (module-use!
    (module-public-interface (current-module))
    (module-public-interface %generics)))