From attila.lendvai at gmail.com  Sat Mar  1 10:54:29 2008
From: attila.lendvai at gmail.com (Attila Lendvai)
Date: Sat, 1 Mar 2008 11:54:29 +0100
Subject: [cl-pdf-devel] [bug] *name-counter* unbound in
	with-existing-document
In-Reply-To: <25A4C171-A8D2-4F58-82F0-E7B719913016@foldr.org>
References: <25A4C171-A8D2-4F58-82F0-E7B719913016@foldr.org>
Message-ID: <b54b34af0803010254q20f59134hb981a1742e6e7c3b@mail.gmail.com>

>  attached is a small patch which binds *name-counter* in with-existing-
>  document.  Otherwise I get errors of the variable being unbound when
>  trying to use w-e-d.

pushed, thanks.

-- 
 attila


From lohner.roland at gmail.com  Wed Mar  5 11:47:14 2008
From: lohner.roland at gmail.com (Roland Lohner)
Date: Wed, 5 Mar 2008 12:47:14 +0100
Subject: [cl-pdf-devel] Character encoding?
In-Reply-To: <47C1DA36.7020101@gigamonkeys.com>
References: <47C1DA36.7020101@gigamonkeys.com>
Message-ID: <b57b88510803050347x61054794uf6cee805f84d4655@mail.gmail.com>

Hi Peter,

I am not subscribed on cl-typesetting list, so don't know if you got any answer.

Cl-pdf actually knows the font being used at the moment, and does this
translation on demand automatically. The special cl-pdf::*font* is
bound to the font being used. Pdf:get-kerning, pdf:get-char-width,
pdf:draw-spaced-strings and other functions in cl-pdf use
pdf::char-external-code indirectly, in case of a single byte encoding
and non standard character. Char-external-code does the translation
according the given character and character set. The character set is
computed as (charset (encoding *font*)). If you use tt:put-string and
tt:draw-pages, these functions call the three pdf functions mentioned
above, so there should be no encoding problems. (on sbcl I don't have
any at the moment)

This problem can occur if you try to put a character to the document,
which character is not contained in the used encoding. If you are
sure, this is not the case, than you can try to avoid encoding
problems by setting up encoding directly by font selection. For
example:

(paragraph (:font (pdf::get-font "my font name" pdf::*latin-2-encoding*))
                    (put-string "? and ? are contained in latin-2") :eop)

Hope, I could help.

Regards,
Roland Lohner


2008/2/24, Peter Seibel <peter at gigamonkeys.com>:
> So let's say I'm using a Lisp that uses Unicode strings. I have some
>  strings that contain characters such as u+2018 and u+2019 (i.e. curly
>  quotes). If I'm using a non-Unicode font there are no font metrics for
>  those code points and I get an array index error if I try to render
>  those strings. But if I translate those to the corresponding cp-1252
>  code points. On the other hand if I *am* using a Unicode font, I want to
>  leave the strings alone. Would it make sense for cl-pdf, knowing what
>  font is being used at the moment, to do this translation for me or not,
>  as needed? If so, where's the best place for that to happen? In PUT-STRING?
>
>  -Peter
>
>
>  --
>
> Peter Seibel                     : peter at gigamonkeys.com
>  A Billion Monkeys Can't be Wrong : http://www.gigamonkeys.com/blog/
>  Practical Common Lisp            : http://www.gigamonkeys.com/book/
>  Coders at Work                   : http://www.codersatwork.com/
>  _______________________________________________
>  cl-pdf-devel site list
>  cl-pdf-devel at common-lisp.net
>  http://common-lisp.net/mailman/listinfo/cl-pdf-devel
>

From divanov at aha.ru  Wed Mar 12 10:07:29 2008
From: divanov at aha.ru (Dmitriy Ivanov)
Date: Wed, 12 Mar 2008 13:07:29 +0300
Subject: [cl-pdf-devel] Adding read-data paramter to read-jpeg-file and
	read-png-file functions
Message-ID: <000501c88428$e4ce4220$8100a8c0@digo>

Hello folks,

I am thinking of using some PDF functions with a simple site content
management project. They could determine just the image size from the file
header without reading the whole data.

It would nice equipping these functions with the read-data key parameter,
i.e.

(defun %read-jpeg-file% (filename &key (read-data t))
  ...)

If the :read-data argument got the explicit false value, the functions
read-jpeg-file and read-pnd-file returned an instance of bitmap-image with
null data.

Any objections?

BTW, is anybody aware of a lisp code for resizing JPEG images?
--
Sincerely,
Dmitriy Ivanov
lisp.ystok.ru



From gwking at metabang.com  Wed Mar 12 11:40:28 2008
From: gwking at metabang.com (Gary King)
Date: Wed, 12 Mar 2008 07:40:28 -0400
Subject: [cl-pdf-devel] Adding read-data paramter to read-jpeg-file and
	read-png-file functions
In-Reply-To: <000501c88428$e4ce4220$8100a8c0@digo>
References: <000501c88428$e4ce4220$8100a8c0@digo>
Message-ID: <CD4ECC0F-3184-4B5D-AA76-65F6EC2E8E46@metabang.com>

> (defun %read-jpeg-file% (filename &key (read-data t))
>  ...)
>
> If the :read-data argument got the explicit false value, the functions
> read-jpeg-file and read-pnd-file returned an instance of bitmap- 
> image with
> null data.

This sounds like a good idea to me though I'd be inclined to use  
something like :metadata-only or :read-header-only instead of read- 
data because the former seems more explicit to me than the later.

> BTW, is anybody aware of a lisp code for resizing JPEG images?

It seems like Zach Beane would have something to do this but I'm not  
sure.
--
Gary Warren King, metabang.com
Cell: (413) 559 8738
Fax: (206) 338-4052
gwkkwg on Skype * garethsan on AIM






From marc.battyani at fractalconcept.com  Wed Mar 12 20:50:26 2008
From: marc.battyani at fractalconcept.com (Marc Battyani)
Date: Wed, 12 Mar 2008 21:50:26 +0100
Subject: [cl-pdf-devel] Adding read-data paramter to read-jpeg-file and
	read-png-file functions
In-Reply-To: <000501c88428$e4ce4220$8100a8c0@digo>
References: <000501c88428$e4ce4220$8100a8c0@digo>
Message-ID: <47D84212.1000303@fractalconcept.com>

Dmitriy Ivanov wrote:
> Hello folks,
>
> I am thinking of using some PDF functions with a simple site content
> management project. They could determine just the image size from the file
> header without reading the whole data.
>
> It would nice equipping these functions with the read-data key parameter,
> i.e.
>
> (defun %read-jpeg-file% (filename &key (read-data t))
>   ...)
>
> If the :read-data argument got the explicit false value, the functions
> read-jpeg-file and read-pnd-file returned an instance of bitmap-image with
> null data.
>
> Any objections?
>   
It's ok for me though I agree with Gary that it's better to invert the
flag with a key arg like :header-only (BTW :read-header-only seems
redundant as it's already a read function :)
> BTW, is anybody aware of a lisp code for resizing JPEG images?
>   
cl-gd?

Marc




From divanov at aha.ru  Thu Mar 13 05:30:07 2008
From: divanov at aha.ru (Dmitriy Ivanov)
Date: Thu, 13 Mar 2008 08:30:07 +0300
Subject: [cl-pdf-devel] Adding read-data paramter to read-jpeg-file and
	read-png-file functions
References: <000501c88428$e4ce4220$8100a8c0@digo>
	<3A838C06-0418-4A6C-80CE-164D88281F07@bobobeach.com>
Message-ID: <000101c884cb$54739e70$8100a8c0@digo>

Cyrus Harmon wrote on Wed, 12 Mar 2008 10:06:25 -0700 20:06:

| ch-image has facilities for reading and writing jpeg files and
| applying affine transformations to the images, including, of course,
| resizing.

Thanks, but the two questions have arised.

1) Is it "very" SBCL-specific? Has anybody tried to port it on LispWorks?

2) The link http://cyrusharmon.org/cl/projects/ch-image/ seems to lead to
nothing (actually to "Hunchentoot Default Page").
--
Sincerely,
Dmitriy Ivanov
lisp.ystok.ru



From divanov at aha.ru  Thu Mar 13 05:22:16 2008
From: divanov at aha.ru (Dmitriy Ivanov)
Date: Thu, 13 Mar 2008 08:22:16 +0300
Subject: [cl-pdf-devel] Adding read-data paramter to read-jpeg-file and
	read-png-file functions
References: <000501c88428$e4ce4220$8100a8c0@digo>
	<47D84212.1000303@fractalconcept.com>
Message-ID: <000001c884cb$53341990$8100a8c0@digo>

Marc Battyani wrote on Wed, 12 Mar 2008 21:50:26 +0100 23:50:

| It's ok for me though I agree with Gary that it's better to invert the
| flag with a key arg like :header-only (BTW :read-header-only seems
| redundant as it's already a read function :)

OK, :header-only is committed.

|> BTW, is anybody aware of a lisp code for resizing JPEG images?
|>   
| cl-gd?

Thanks, Marc. CL-GD looks too huge for beginners :-(
--
Sincerely,
Dmitriy Ivanov
lisp.ystok.ru


From BlogBlaster at common-lisp.net  Wed Mar 19 04:29:23 2008
From: BlogBlaster at common-lisp.net (BlogBlaster at common-lisp.net)
Date: 19 Mar 2008 12:29:23 +0800
Subject: [cl-pdf-devel] "How would you like to have your ad on 2 Million
	Websites ?"
Message-ID: <20080319122923.B9ED8003D8A3FE73@from.header.has.no.domain>

How would you like 2 Million Sites linking to your ad ?

Weblog or blog population is exploding around the world, resembling the 
growth of e-mail users in the 1990s.

Post your ads where people read them!

- What if you could place your ad on all these sites ?
Right, that would mean you would have millions of sites linking to your ad. 


For Full details please read the attached .html file















Unsubscribe

Please read the attached .txt file
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cl-pdf-devel/attachments/20080319/24b0f628/attachment.htm>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: Unsubscribe email.txt
URL: <https://mailman.common-lisp.net/pipermail/cl-pdf-devel/attachments/20080319/24b0f628/attachment.txt>

From Feed at common-lisp.net  Sat Mar 22 02:42:36 2008
From: Feed at common-lisp.net (Feed at common-lisp.net)
Date: 22 Mar 2008 10:42:36 +0800
Subject: [cl-pdf-devel] Feed Blaster puts your ad right to the screens of
	millions in 15 Minutes !
Message-ID: <20080322104236.12934AAF4B7EEF1E@from.header.has.no.domain>

More and more people are subscribing to feeds every
day and there are millions who are already subscribed.

Thus, your ad will reach a very broad range of potential customers with 
each use of Feed Blaster!

Feed Blaster is the first & only submitter that can submit your
ads to thousands of feeds within a few minutes!

Post your ads where people read them!

- What if you could place your ad into all these feeds ?

Right, that would mean you would have millions of sites
linking to your ad - and millions of users reading your message within
minutes - and my idea actually works


For Full details please read the attached .html file






Unsubscribe:
Please read the attached .txt file
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cl-pdf-devel/attachments/20080322/c69ca358/attachment.htm>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: Unsubscribe email.txt
URL: <https://mailman.common-lisp.net/pipermail/cl-pdf-devel/attachments/20080322/c69ca358/attachment.txt>

From Instant at common-lisp.net  Mon Mar 24 18:52:16 2008
From: Instant at common-lisp.net (Instant at common-lisp.net)
Date: 25 Mar 2008 02:52:16 +0800
Subject: [cl-pdf-devel] Can you afford to lose 300,
	000 potential customers per year ?
Message-ID: <20080325025216.F61E5A93D137FDD8@from.header.has.no.domain>

Can you afford to lose 300,000 potential customers per year ?

How would You like to divert 1000s of fresh,
new visitors daily to Your web site or affiliate web site from
Google, Yahoo, MSN and others At $0 cost to you...?

...iNSTANT BOOSTER diverts 1000s of fresh,
new visitors daily to Your web site or affiliate
web site from Google, Yahoo, MSN and others
at $0 cost to you!

...No matter what you are selling or offering -
INTSANT BOOSTER will pull in hordes of potential customers to your website 
- instantly!


For Full Details Please read the attached .html file




















Unsubscribe:
Please read the attached .txt file
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cl-pdf-devel/attachments/20080325/37fd3a65/attachment.htm>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: Unsubscribe email.txt
URL: <https://mailman.common-lisp.net/pipermail/cl-pdf-devel/attachments/20080325/37fd3a65/attachment.txt>

From Top at common-lisp.net  Fri Mar 28 21:34:57 2008
From: Top at common-lisp.net (Top at common-lisp.net)
Date: 28 Mar 2008 13:34:57 -0800
Subject: [cl-pdf-devel] 1000s Of Hits From Google, Yahoo,
	MSN And Others At $0 Cost To You !
Message-ID: <20080328133456.151483CAC77F8892@from.header.has.no.domain>

Hi, my name is Sebastian Foss.

As incredible as it may sound you're about to discover a system how you

can drive 1000s of potential customers to any website or affiliate website 
at $0 cost to you!What if I told you that I'm making thousands of dollars 
each week and I'm not paying a
dime for advertising ?

Google, Yahoo, MSN and others are sending me hundreds of new customers 
every week
- at $0 cost! Make Money On Auto-Pilot While You're Sleeping Or Even On 
Vacation?
STOP Everything You Are Doing and Read This Now!

This works for any product, website or affiliate website!

FOR FULL DETAILS PLEASE READ THE ATTACHED .HTML FILE











To Unsubscribe
Please read the attached .txt file
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cl-pdf-devel/attachments/20080328/7a852abc/attachment.htm>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: Unsubscribe email.txt
URL: <https://mailman.common-lisp.net/pipermail/cl-pdf-devel/attachments/20080328/7a852abc/attachment.txt>