src/packages.lisp

(defpackage :lisp-on-lines
  (:use :arnesi
	:iterate
	:meta-model
	:common-lisp
	:it.bese.ucw
	:clsql
	:contextl)
  (:nicknames :lol :mewa)

  (:shadowing-import-from
   :iterate
   :with)

  (:shadowing-import-from
   :clsql
   :time-difference
   :make-time
   :time-ymd
   :date
   :get-time
   :time-element
   :time+
   :date-element)

  (:shadow
   :present
   :present-slot
   :presentation
   :instance
   :slot-presentation
   :integer-slot-presentation
   :string-slot-presentation
   :object-presentation
   :one-line-presentation
   :presentation-slot-value
   :get-foreign-instances)

  (:export
   ;;;; CLSQL meta-model/default attributes definers
   ;;;; TODO: should be moved to meta-model,
   ;;;; with lol specific function implemented like the
   ;;;; CLOS meta-model
   :define-view-for-table
   :define-views-for-database


   ;;;; The LoL 3 displays
   :defdisplay
   :defattribute
   :display
   :display-using-description
   :call-display


   ;;;;a wrapper for calling make-presentation
   :call-view
   :present-view
   :slot-view
   :present-slot-view
   :make-view
   ;;;; Ajax
   :auto-complete
   :call-auto-complete

   ;;;; Mewa Exports
   :mewa ;the superclass of all mewa-presentations
   :make-presentation
   :call-presentation

   :find-occurence

   ;;attributes
   :attributes
   :attribute-value
   :define-attributes
   :with-default-attributes
   :set-default-attributes
   :set-attribute
   :find-attribute
   :perform-set-attributes
   ;;
   :perform-set-attribute-properties
   :define-attributes

   ;; presentation objects
   :mewa-object-presentation
   :mewa-one-line-presentation
   :mewa-list-presentation
   :mewa-search-presentation
   :mewa-presentation-search

   :editablep
   :global-properties
   ;; SLOT presentations

   :mewa-relation-slot-presentation
   :mewa-string-slot-presentation
   :has-many-slot-presentation
   :has-a
   :has-many
   :has-very-many
   :many-to-many

   ;; CRUD
   :instance-is-stored-p

   ;;;; Meta Model Exports))
   :define-meta-model
   :def-view-class-from-table
   :def-view-class/meta
   :list-slot-types
   ))
Commit	Line	Data
	1	(defpackage :lisp-on-lines
	2	(:use :arnesi
	3	:iterate
	4	:meta-model
	5	:common-lisp
	6	:it.bese.ucw
	7	:clsql
	8	:contextl)
	9	(:nicknames :lol :mewa)
	10
	11	(:shadowing-import-from
	12	:iterate
	13	:with)
	14
	15	(:shadowing-import-from
	16	:clsql
	17	:time-difference
	18	:make-time
	19	:time-ymd
	20	:date
	21	:get-time
	22	:time-element
	23	:time+
	24	:date-element)
	25
	26	(:shadow
	27	:present
	28	:present-slot
	29	:presentation
	30	:instance
	31	:slot-presentation
	32	:integer-slot-presentation
	33	:string-slot-presentation
	34	:object-presentation
	35	:one-line-presentation
	36	:presentation-slot-value
	37	:get-foreign-instances)
	38
	39	(:export
	40	;;;; CLSQL meta-model/default attributes definers
	41	;;;; TODO: should be moved to meta-model,
	42	;;;; with lol specific function implemented like the
	43	;;;; CLOS meta-model
	44	:define-view-for-table
	45	:define-views-for-database
	46
	47
	48	;;;; The LoL 3 displays
	49	:defdisplay
	50	:defattribute
	51	:display
	52	:display-using-description
	53	:call-display
	54
	55
	56	;;;;a wrapper for calling make-presentation
	57	:call-view
	58	:present-view
	59	:slot-view
	60	:present-slot-view
	61	:make-view
	62	;;;; Ajax
	63	:auto-complete
	64	:call-auto-complete
	65
	66	;;;; Mewa Exports
	67	:mewa ;the superclass of all mewa-presentations
	68	:make-presentation
	69	:call-presentation
	70
	71	:find-occurence
	72
	73	;;attributes
	74	:attributes
	75	:attribute-value
	76	:define-attributes
	77	:with-default-attributes
	78	:set-default-attributes
	79	:set-attribute
	80	:find-attribute
	81	:perform-set-attributes
	82	;;
	83	:perform-set-attribute-properties
	84	:define-attributes
	85
	86	;; presentation objects
	87	:mewa-object-presentation
	88	:mewa-one-line-presentation
	89	:mewa-list-presentation
	90	:mewa-search-presentation
	91	:mewa-presentation-search
	92
	93	:editablep
	94	:global-properties
	95	;; SLOT presentations
	96
	97	:mewa-relation-slot-presentation
	98	:mewa-string-slot-presentation
	99	:has-many-slot-presentation
	100	:has-a
	101	:has-many
	102	:has-very-many
	103	:many-to-many
	104
	105	;; CRUD
	106	:instance-is-stored-p
	107
	108	;;;; Meta Model Exports))
	109	:define-meta-model
	110	:def-view-class-from-table
	111	:def-view-class/meta
	112	:list-slot-types
	113	))