defdoc-cvs

defdoc-cvs@common-lisp.net

44 discussions

[defdoc-cvs] CVS update: DefDoc/src/layout/engine-framework.lisp DefDoc/src/layout/html-engine.lisp
by Rahul Jain 15 Feb '04

15 Feb '04

Update of /project/defdoc/cvsroot/DefDoc/src/layout In directory common-lisp.net:/tmp/cvs-serv25120/src/layout Modified Files: engine-framework.lisp html-engine.lisp Log Message: additions and tweaks for the defdoc-generated defdoc website: elements that are abbreviations for more complex sequences of elements hyperlink document element small-caps style element subtitle in documents Date: Sun Feb 15 00:01:46 2004 Author: rjain Index: DefDoc/src/layout/engine-framework.lisp diff -u DefDoc/src/layout/engine-framework.lisp:1.1.1.1 DefDoc/src/layout/engine-framework.lisp:1.2 --- DefDoc/src/layout/engine-framework.lisp:1.1.1.1 Sun Dec 7 18:27:06 2003 +++ DefDoc/src/layout/engine-framework.lisp Sun Feb 15 00:01:45 2004 @@ -288,3 +288,6 @@ (call-next-method)) t) +(defmethod convert ((input defdoc.elements:abbreviation) (output t)) + (dolist (element (contents input)) + (convert element output))) \ No newline at end of file Index: DefDoc/src/layout/html-engine.lisp diff -u DefDoc/src/layout/html-engine.lisp:1.1.1.1 DefDoc/src/layout/html-engine.lisp:1.2 --- DefDoc/src/layout/html-engine.lisp:1.1.1.1 Sun Dec 7 18:27:07 2003 +++ DefDoc/src/layout/html-engine.lisp Sun Feb 15 00:01:46 2004 @@ -22,6 +22,7 @@ text, e.g.") (defvar *document-title*) +(defvar *document-subtitle*) (defvar *html-stream*) @@ -202,6 +203,7 @@ (defmethod convert ((input toplevel-element) (output html-output)) (with-accessors ((title title) + (subtitle subtitle) (author author) (date date) (copyright copyright)) input @@ -210,7 +212,8 @@ (let ((*suppress-html-tags* t)) (convert element output))))) (let ((*html-head-elements* *html-head-elements*) - (*document-title* title)) + (*document-title* title) + (*document-subtitle* subtitle)) (when author (push (list :META :NAME "Author" :CONTENT (convert-to-string author)) *html-head-elements*)) @@ -231,7 +234,9 @@ (with-html-block+ (0 :mandatory :HTML) (with-html-block+ (1 :mandatory :HEAD) (with-html-block (:TITLE) - (convert-to-text *document-title*)) + (convert-to-text *document-title*) + (write " - " :stream *html-stream*) + (convert-to-text *document-subtitle*)) (dolist (element *html-head-elements*) (pprint-newline :linear *html-stream*) (write-html-tag* element))) @@ -278,6 +283,14 @@ (define-html-conversion italic (input) (with-html-inline (:I) + (convert))) + +(define-html-conversion small-caps (input) + (with-html-inline (:SPAN :style "font-variant: small-caps") + (convert))) + +(define-html-conversion link (input) + (with-html-inline (:A :href (url input)) (convert))) (define-html-conversion discretionary-hyphen (input)

1 0

[defdoc-cvs] CVS update: DefDoc/src/elements/abbreviations.lisp DefDoc/src/elements/links.lisp DefDoc/src/elements/package.lisp DefDoc/src/elements/style.lisp DefDoc/src/elements/toplevel.lisp
by Rahul Jain 15 Feb '04

15 Feb '04

Update of /project/defdoc/cvsroot/DefDoc/src/elements In directory common-lisp.net:/tmp/cvs-serv25120/src/elements Modified Files: package.lisp style.lisp toplevel.lisp Added Files: abbreviations.lisp links.lisp Log Message: additions and tweaks for the defdoc-generated defdoc website: elements that are abbreviations for more complex sequences of elements hyperlink document element small-caps style element subtitle in documents Date: Sun Feb 15 00:01:44 2004 Author: rjain Index: DefDoc/src/elements/package.lisp diff -u DefDoc/src/elements/package.lisp:1.1.1.1 DefDoc/src/elements/package.lisp:1.2 --- DefDoc/src/elements/package.lisp:1.1.1.1 Sun Dec 7 18:27:11 2003 +++ DefDoc/src/elements/package.lisp Sun Feb 15 00:01:44 2004 @@ -74,6 +74,7 @@ #:toplevel-subelement #:document #:title + #:subtitle #:author #:copyright #:date @@ -98,7 +99,16 @@ ;;; style.lisp #:bold - #:italic)) + #:italic + #:small-caps + + ;;; abbreviations.lisp + #:abbreviation + #:defabbreviation + + ;;; links.lisp + #:link + #:url)) (defpackage :defdoc.elements.section-header (:use) Index: DefDoc/src/elements/style.lisp diff -u DefDoc/src/elements/style.lisp:1.1.1.1 DefDoc/src/elements/style.lisp:1.2 --- DefDoc/src/elements/style.lisp:1.1.1.1 Sun Dec 7 18:27:11 2003 +++ DefDoc/src/elements/style.lisp Sun Feb 15 00:01:44 2004 @@ -14,3 +14,9 @@ () (:documentation "The contents of this container are to toggle the use of italicization relative to its parent.")) + +(defclass small-caps (style-container) + () + (:documentation "The contents of this container are ideally to render +with lowercase letters using uppercase glpyhs scaled to be as tall as +the x-height, while preserving weighting.")) Index: DefDoc/src/elements/toplevel.lisp diff -u DefDoc/src/elements/toplevel.lisp:1.1.1.1 DefDoc/src/elements/toplevel.lisp:1.2 --- DefDoc/src/elements/toplevel.lisp:1.1.1.1 Sun Dec 7 18:27:11 2003 +++ DefDoc/src/elements/toplevel.lisp Sun Feb 15 00:01:44 2004 @@ -4,6 +4,9 @@ ((title :initform nil :initarg title :accessor title) + (subtitle :initform nil + :initarg subtitle + :accessor subtitle) (author :initform nil :initarg author :accessor author)

1 0

[defdoc-cvs] CVS update: DefDoc/src/frontends/basic/engine.lisp
by Rahul Jain 15 Feb '04

15 Feb '04

Update of /project/defdoc/cvsroot/DefDoc/src/frontends/basic In directory common-lisp.net:/tmp/cvs-serv25120/src/frontends/basic Modified Files: engine.lisp Log Message: additions and tweaks for the defdoc-generated defdoc website: elements that are abbreviations for more complex sequences of elements hyperlink document element small-caps style element subtitle in documents Date: Sun Feb 15 00:01:45 2004 Author: rjain Index: DefDoc/src/frontends/basic/engine.lisp diff -u DefDoc/src/frontends/basic/engine.lisp:1.1.1.1 DefDoc/src/frontends/basic/engine.lisp:1.2 --- DefDoc/src/frontends/basic/engine.lisp:1.1.1.1 Sun Dec 7 18:27:06 2003 +++ DefDoc/src/frontends/basic/engine.lisp Sun Feb 15 00:01:45 2004 @@ -17,7 +17,7 @@ `(doc ,@item))) contents)))) -(defmacro doc (type initargs &body body) +(defmacro doc (type &optional initargs &body body) (let ((initargs (quote-keynames initargs))) `(make-instance ',type 'contents ,(make-contents-form body)

1 0

[defdoc-cvs] CVS update: DefDoc/src/defdoc.asd
by Rahul Jain 15 Feb '04

15 Feb '04

Update of /project/defdoc/cvsroot/DefDoc/src In directory common-lisp.net:/tmp/cvs-serv25120/src Modified Files: defdoc.asd Log Message: additions and tweaks for the defdoc-generated defdoc website: elements that are abbreviations for more complex sequences of elements hyperlink document element small-caps style element subtitle in documents Date: Sun Feb 15 00:01:44 2004 Author: rjain Index: DefDoc/src/defdoc.asd diff -u DefDoc/src/defdoc.asd:1.1.1.1 DefDoc/src/defdoc.asd:1.2 --- DefDoc/src/defdoc.asd:1.1.1.1 Sun Dec 7 18:27:05 2003 +++ DefDoc/src/defdoc.asd Sun Feb 15 00:01:44 2004 @@ -1,19 +1,17 @@ (asdf:defsystem :DefDoc - :components + :components ((:module :core - :core-dep t :pathname "" :components ((:file "package"))) (:module :layout-core :components - ((:file "package" - :core-dep t) + ((:file "package") (:file "lengths") - (:file "aesthetics"))) + (:file "aesthetics")) + :depends-on (:core)) (:module :elements :components - ((:file "package" - :core-dep t) + ((:file "package") (:file "color") #+nil (:file "fonts") (:file "basic-elements") @@ -22,24 +20,27 @@ (:file "structural" :depends-on ("basic-elements")) (:file "style" + :depends-on ("basic-elements")) + (:file "abbreviations" + :depends-on ("basic-elements")) + (:file "links" :depends-on ("basic-elements"))) :depends-on (:layout-core)) #+nil (:module :font-metrics :components - ((:file "package" - :core-dep t) + ((:file "package") (:file "tfm") (:file "tfm-reader" :depends-on ("tfm")) (:file "afm") (:file "afm-reader" :depends-on ("afm")) - (:file "freetype"))) + (:file "freetype")) + :depends-on (:core)) (:module :layout :components - ((:file "package" - :core-dep t) + ((:file "package") (:file "output-destinations") (:file "output-formats" :depends-on ("output-destinations")) @@ -47,7 +48,7 @@ :depends-on ("output-formats")) (:file "no-layout-engine" :depends-on ("engine-framework" "output-formats")) - (:file "flexible-layout-engine" + (:file "flexiblxbe-layout-engine" :depends-on ("engine-framework" "output-formats")) (:file "html-engine" :depends-on ("output-formats" "no-layout-engine"))) @@ -56,12 +57,10 @@ :depends-on (:layout :elements)) (:module "frontends" :components - ((:file "package" - :core-dep t) + ((:file "package") (:module "basic" :components - ((:file "package" - :core-dep t) + ((:file "package") (:file "engine")))) :depends-on (:layout :elements))) :depends-on (:specified-types))

1 0

[defdoc-cvs] CVS update: DefDoc/doc/overview.tex
by Rahul Jain 14 Feb '04

14 Feb '04

Update of /project/defdoc/cvsroot/DefDoc/doc In directory common-lisp.net:/tmp/cvs-serv22025/doc Modified Files: overview.tex Log Message: update copyright to extend all the way to now Date: Sat Feb 14 17:39:38 2004 Author: rjain Index: DefDoc/doc/overview.tex diff -u DefDoc/doc/overview.tex:1.2 DefDoc/doc/overview.tex:1.3 --- DefDoc/doc/overview.tex:1.2 Sat Feb 14 15:26:22 2004 +++ DefDoc/doc/overview.tex Sat Feb 14 17:39:38 2004 @@ -19,7 +19,7 @@ \title{\doctitle \\ {\it\large\docsubtitle}} \author{by \myname} -\date{\texttt{$$Id: overview.tex,v 1.2 2004/02/14 20:26:22 rjain Exp $$}} +\date{\texttt{$$Id: overview.tex,v 1.3 2004/02/14 22:39:38 rjain Exp $$}} \begin{document} \maketitle @@ -38,7 +38,7 @@ \subsection{Copyrights} \label{sec:copyrights} -This document is copyright by Rahul Jain, 2002--2003, all rights reserved. +This document is copyright by Rahul Jain, 2002--2004, all rights reserved. \chapter{General Concepts} \label{cha:concepts}

1 0

[defdoc-cvs] CVS update: DefDoc/website/index.html
by Rahul Jain 14 Feb '04

14 Feb '04

Update of /project/defdoc/cvsroot/DefDoc/website In directory common-lisp.net:/tmp/cvs-serv31235/website Modified Files: index.html Log Message: use site's stylesheet Date: Sat Feb 14 17:31:05 2004 Author: rjain Index: DefDoc/website/index.html diff -u DefDoc/website/index.html:1.1 DefDoc/website/index.html:1.2 --- DefDoc/website/index.html:1.1 Sat Feb 14 15:41:22 2004 +++ DefDoc/website/index.html Sat Feb 14 17:31:05 2004 @@ -2,6 +2,7 @@ <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-15"> +<link rel="stylesheet" type="text/css" href="/style.css"> <title>DefDoc - An extensible, dynamic document creation system</title> </head> @@ -33,6 +34,6 @@ <hr> <address></address> -Last modified: Sat Feb 14 15:14:34 EST 2004  +Last modified: Sat Feb 14 17:33:04 EST 2004  </body> </html>

1 0

[defdoc-cvs] CVS update: DefDoc/website/Makefile
by Rahul Jain 14 Feb '04

14 Feb '04

Update of /project/defdoc/cvsroot/DefDoc/website In directory common-lisp.net:/tmp/cvs-serv28802/website Modified Files: Makefile Log Message: hack because make doesn't recognize dirs as files Date: Sat Feb 14 17:30:49 2004 Author: rjain Index: DefDoc/website/Makefile diff -u DefDoc/website/Makefile:1.2 DefDoc/website/Makefile:1.3 --- DefDoc/website/Makefile:1.2 Sat Feb 14 16:02:48 2004 +++ DefDoc/website/Makefile Sat Feb 14 17:30:49 2004 @@ -6,7 +6,7 @@ scp -r public_html/ common-lisp.net:/project/defdoc/ $(WEBDIR): - mkdir $@ + -mkdir $@ install: $(WEBDIR) install-html install-docs

1 0

[defdoc-cvs] CVS update: DefDoc/website/Makefile
by Rahul Jain 14 Feb '04

14 Feb '04

Update of /project/defdoc/cvsroot/DefDoc/website In directory common-lisp.net:/tmp/cvs-serv9536/website Modified Files: Makefile Log Message: add upload target and tweak perms on files installed to the web site Date: Sat Feb 14 16:02:49 2004 Author: rjain Index: DefDoc/website/Makefile diff -u DefDoc/website/Makefile:1.1 DefDoc/website/Makefile:1.2 --- DefDoc/website/Makefile:1.1 Sat Feb 14 15:41:22 2004 +++ DefDoc/website/Makefile Sat Feb 14 16:02:48 2004 @@ -1,13 +1,19 @@ INSTALL="/usr/bin/install" -WEBDIR="../public_html" +WEBDIR="public_html" -install: install-html install-docs +upload: install + scp -r public_html/ common-lisp.net:/project/defdoc/ + +$(WEBDIR): + mkdir $@ + +install: $(WEBDIR) install-html install-docs install-docs: install-overview install-overview: overview.pdf overview.ps ../doc/overview.tex - $(INSTALL) $^ $(WEBDIR) + $(INSTALL) -m 644 $^ $(WEBDIR) overview.pdf overview.ps: ../doc/overview.tex overview.bbl @@ -18,7 +24,7 @@ ln -s $< $@ install-html: - $(INSTALL) $(wildcard *.html) $(WEBDIR) + $(INSTALL) -m 644 $(wildcard *.html) $(WEBDIR) #

1 0

[defdoc-cvs] CVS update: DefDoc/website/Makefile DefDoc/website/index.html
by Rahul Jain 14 Feb '04

14 Feb '04

Update of /project/defdoc/cvsroot/DefDoc/website In directory common-lisp.net:/tmp/cvs-serv30689/website Added Files: Makefile index.html Log Message: website and installer/generator Makefile Date: Sat Feb 14 15:41:23 2004 Author: rjain

1 0

[defdoc-cvs] CVS update: Directory change: DefDoc/website
by Rahul Jain 14 Feb '04

14 Feb '04

Update of /project/defdoc/cvsroot/DefDoc/website In directory common-lisp.net:/tmp/cvs-serv21891/website Log Message: Directory /project/defdoc/cvsroot/DefDoc/website added to the repository Date: Sat Feb 14 15:26:49 2004 Author: rjain New directory DefDoc/website added

1 0

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

defdoc-cvs