src/protocols/package.lisp

   1 ;;; -*- Mode: Lisp; Syntax: Common-Lisp; Package: CL-USER; -*-
   2 ;;; ---------------------------------------------------------------------------
   3 ;;;     Title: Package definition for the Closure Protocols container package
   4 ;;;   Created: 2002-08-07 03:26
   5 ;;;    Author: Gilbert Baumann <gilbert@base-engineering.com>
   6 ;;;   License: LGPL (See file COPYING for details).
   7 ;;; ---------------------------------------------------------------------------
   8 ;;;  (c) copyright 2002 by Gilbert Baumann
   9
  10 ;;;  Permission is hereby granted, free of charge, to any person obtaining
  11 ;;;  a copy of this software and associated documentation files (the
  12 ;;;  "Software"), to deal in the Software without restriction, including
  13 ;;;  without limitation the rights to use, copy, modify, merge, publish,
  14 ;;;  distribute, sublicense, and/or sell copies of the Software, and to
  15 ;;;  permit persons to whom the Software is furnished to do so, subject to
  16 ;;;  the following conditions:
  17 ;;;
  18 ;;;  The above copyright notice and this permission notice shall be
  19 ;;;  included in all copies or substantial portions of the Software.
  20 ;;;
  21 ;;;  THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  22 ;;;  EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  23 ;;;  MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
  24 ;;;  IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
  25 ;;;  CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
  26 ;;;  TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
  27 ;;;  SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  28
  29 (defpackage :CLOSURE-PROTOCOL
  30     (:use :glisp :runes)
  31   (:export
  32    ;; Basic Element Protocol
  33    #:element-p
  34    #:element-parent
  35    #:element-children
  36    #:element-attribute
  37    #:element-gi
  38    #:text-element-p
  39    #:element-text
  40
  41    ;; css support protocol
  42    #:element-css-class
  43    #:element-css-id
  44    #:pseudo-class-matches-p
  45    #:element-style-cache
  46    #:element-implicit-style
  47    #:element-explicit-style
  48
  49    ;; renderer support protocol
  50    #:element-replaced-element-1
  51    #:element-replaced-element
  52    #:*user-agent*
  53    #:*document-language*
  54    #:element-base-url
  55    #:element-imap
  56    #:render
  57    #:root-element-embedded-style
  58    ))
  59