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