← Back to branch summary

~ubuntu-branches/ubuntu/lucid/sawfish/lucid-updates

« back to all changes in this revision

Viewing changes to lisp/sawfish/wm/gaol.jl

  • Committer: Bazaar Package Importer
  • Author(s): Christian Marillat
  • Date: 2005-02-23 16:16:46 UTC
  • mfrom: (1.2.1 upstream) (2.1.2 hoary)
  • Revision ID: james.westby@ubuntu.com-20050223161646-4id6qyw4h9lkvb0v
Tags: 1:1.3+cvs20050222-1
http://bugs.debian.org/295290
* New cvs release.
* Add an emacs initialisation script to load sawfish.el (Closes: #295290)
* Updated sawfish.el to 1.32

Show diffs side-by-side

added added

removed removed

Lines of Context:
lisp/sawfish/wm/gaol.jl
1
1
#| gaol.jl -- protected environment for themes
2
2
 
3
 
   $Id: gaol.jl,v 1.34 2001/01/20 02:40:28 jsh Exp $
 
3
   $Id: gaol.jl,v 1.35 2002/11/03 04:23:45 jsh Exp $
4
4
 
5
5
   Copyright (C) 1999, 2000 John Harper <john@dcs.warwick.ac.uk>
6
6
 
44
44
  ;; safe functions in the core module
45
45
  (define safe-functions
46
46
    '(get-color-rgb get-color color-name color-rgb colorp get-cursor
47
 
      cursorp get-font font-name fontp text-width font-height
48
 
      font-ascent font-descent
 
47
      cursorp get-font get-font-typed font-type-exists-p font-name
 
48
      fontp font-type text-width font-height font-ascent font-descent
49
49
      screen-width screen-height get-x-property get-x-text-property
50
50
      list-x-properties x-atom x-atom-name make-image
51
51
      make-image-from-x-drawable copy-image