Development list for the MKDoc content management system

headers Kristen Eisenberg | 21 Oct 23:58 · /example/

_______________________________________________
MKDoc-dev mailing list
MKDoc-dev@...
https://lists.webarch.co.uk/mailman/listinfo/mkdoc-dev

Hi,

I've found what I consider to be a flaw with the creation date field on photo
components.

I am currently creating a page on our website which uses a number of old
photographs. The year they were taken is known, but not the actual month and
day. Annoyingly, I have to know all three...

However, this is not the main problem - I'm just putting anything for the final
two parts! - what IS a problem is that I am being told that 1950 and 1948 are
NOT valid dates. Of course, they ARE valid dates, but I'm guessing MKDoc must
have a list of years that don't go back as far as the invention of photography.
Or even the first of the last century!

I think this is something that should be fixed, OR the creation date should be
made truly optional, and NOT be replaced by today's date if you try and leave
it blank!

Jamie

Hi,

I've had an idea for a template that I'm currently calling 'Default Sitemap
Bottom', but I'm not sure how to create it and make it work, and would
appreciate some help.

Basically, it's a bit like the child listing template, but it also shows
grandchildren, great grandchildren etc... just like the sitemap! But doesn't
list the page you're currently on, and only lists sub pages of the section you
are in - nothing above.

I see the listing being more like the old static sitemap, albeit with
descriptions as well. Maybe later have a go at doing a 'dynamic sitemap bottom'
template!

I suspect this can be done as a template, as the functionality for the sitemap
exists - I'm just not sure how to incorporate.

Is it doo-able do you think?

Jamie

Hi,

When a user signs up for email updates, the 'reply-to' email address of 
their newsletters is the one used by the Admin user. I might want to 
change this to use a general email address, but without changing the 
admin account email.

I think the place to do this is in the newsletter en.xml file, and I 
suspect involves modifying the following code:

<From petal:content="string:${root_user/real_name} 
&lt;${root_user/email}&gt;">MKDoc &lt;newsletter@...&gt;</From>

Is it a simple matter of just replacing this with:

<From>enquiries@...</From>

Or is there there more to it than this

Jamie

Hi,

On our new Burngreave Messenger MKDoc website, I've noticed that text 
in descriptions can be formatted in the same way as text in a text 
component (with bulleted lists etc.).

However, this is not the case on the older BNDfC site. Here the 
formatting just doesn't work.

As both sites run on the same server, and presumably run off the same 
MKDoc installation, I'm assuming this is somehow related to information 
somewhere in the templates - I'm just not sure where to find it!

Could you let me know if I'm right in thinking this? If not, what would 
be the way to 'upgrade' an older site to do this, or is it not possible?

Jamie

Currently MKDoc automatically links to child dcouments, this patch 
adds the option to link to sibling documents too.

By default it is disabled, it can be enabled by adding this to the 
httpd-env.conf file:

  SetEnv MKD__LINK_SIBLINGS  TRUE

It also adds two more methods available to template writers:

  document/siblings
  document/siblings_showable

Both return lists of siblings of the current document.  They are 
different from these methods which also include the current document 
in the list:

  document/parent/children
  document/parent/children_showable

-- 
Bruno

Index: flo/Editor.pm
===================================================================
RCS file: /var/spool/cvs/mkd/flo/Editor.pm,v
retrieving revision 1.12.2.50
diff -r1.12.2.50 Editor.pm
223a224,236
> 	# plus we want to hyperlink all the siblings
>         if (MKDoc::Config->LINK_SIBLINGS) {
> 	    foreach my $sibling ($document->siblings_showable)
> 	    {
> 	        push @links, {
>                    class => "mkdoc-name-". $sibling->name,
> 	    	    href => $sibling->uri,
> 	     	    desc => $sibling->description,
> 		    expr => $sibling->title,
> 		    lang => $sibling->lang,
> 	        }
> 	    }
>         }
Index: MKDoc/Config.pm
===================================================================
RCS file: /var/spool/cvs/mkd/MKDoc/Config.pm,v
retrieving revision 1.8.2.49
diff -r1.8.2.49 Config.pm
177a178,184
> sub LINK_SIBLINGS
> {
>     my $class = shift;
>     return get_env ('MKD__LINK_SIBLINGS') || undef;
> }
> 
> 
Index: MKDoc/Site/ConfigWriter/Httpd_Conf.pm
===================================================================
RCS file: /var/spool/cvs/mkd/MKDoc/Site/ConfigWriter/Httpd_Conf.pm,v
retrieving revision 1.1.2.46
diff -r1.1.2.46 Httpd_Conf.pm
228a229,231
> # uncomment this if you want to automatically link to sibling documents
> # SetEnv MKD__LINK_SIBLINGS  TRUE
> 
Index: flo/Record/Document.pm
===================================================================
RCS file: /var/spool/cvs/mkd/flo/Record/Document.pm,v
retrieving revision 1.25.2.73
diff -r1.25.2.73 Document.pm
1664a1665,1721
> ##
> # $self->siblings;
> # ----------------
> # Returns a list of all sibling documents of this document
> ##
> sub siblings
> {
>     my $self = shift;
>     my $args = { @_ };
> 
>     $self->{'.siblings'} ||= do {
> 	my $parent   = $self->parent();
> 	if ($parent)
> 	{
>             my @siblings;
>             for my $sibling ($parent->children())
>             {
>                 push @siblings, $sibling unless $self->equals ($sibling);
>             }
>             \@siblings;
>         }
>         else
>         {
>             [];
>         }
>     };
>     
>     my @res = @{$self->{'.siblings'}};
>     
>     my $with = $args->{'with'};
>     $with and do { @res = map { @{$_->components ($with) } ? $_ : () } @res };
>     
>     my $without = $args->{'without'};
>     $without and do { @res = map { @{$_->components ($without) } ? () : $_ } @res };
>     
>     return wantarray ? @res : \@res;
> }
> 
> ##
> # $self->siblings_showable();
> # ---------------------------
> # Same as siblings(), except returns only showable documents.
> ##
> sub siblings_showable
> {
>     my $self = shift;
>     my @res;
>     if (flo::Standard::current_user && flo::Standard::current_user->is_editor)
>     {
>         @res  = map { $_->is_showable_to_editor() ? $_ : () } $self->siblings;
>     }
>     else
>     {
>         @res  = map { $_->is_showable() ? $_ : () } $self->siblings;
>     }
>     return wantarray ? @res : \@res;
> }

_______________________________________________
MKDoc-dev mailing list
MKDoc-dev@...
https://lists.webarch.co.uk/mailman/listinfo/mkdoc-dev

I've been running several sites for months with this patch applied.  
It allows the complete removal of the lib/ directory from the 
MKDoc-1.6 sources, though it does require the MKDoc::SQL module from 
CPAN.

-- 
Bruno

Index: MKDoc.pm
===================================================================
RCS file: /var/spool/cvs/mkd/Attic/MKDoc.pm,v
retrieving revision 1.15.2.36
diff -r1.15.2.36 MKDoc.pm
37,38c37
< use lib::sql::DBH;
< use lib::sql::Table;
---
> use MKDoc::SQL;
Index: MKDoc/Handler/GroupAuthz.pm
===================================================================
RCS file: /var/spool/cvs/mkd/MKDoc/Handler/Attic/GroupAuthz.pm,v
retrieving revision 1.1.2.2
diff -r1.1.2.2 GroupAuthz.pm
28a29
> use MKDoc::SQL;
99c100
<     my $con          = lib::sql::Condition->new(Editor_ID => $user->id);
---
>     my $con          = MKDoc::SQL::Condition->new(Editor_ID => $user->id);
128c129
<         where => lib::sql::Condition->new(Document_ID => $doc->id)
---
>         where => MKDoc::SQL::Condition->new(Document_ID => $doc->id)
Index: MKDoc/Handler/Initialize.pm
===================================================================
RCS file: /var/spool/cvs/mkd/MKDoc/Handler/Initialize.pm,v
retrieving revision 1.1.2.20
diff -r1.1.2.20 Initialize.pm
31,32c31
< use lib::sql::DBH;
< use lib::sql::Table;
---
> use MKDoc::SQL;
Index: MKDoc/Site/Deploy/DB/Driver.pm
===================================================================
RCS file: /var/spool/cvs/mkd/MKDoc/Site/Deploy/DB/Driver.pm,v
retrieving revision 1.1.2.6
diff -r1.1.2.6 Driver.pm
197,204c197
< use lib::sql::Category;
< use lib::sql::Table;
< use lib::sql::type::Char;
< use lib::sql::type::DateTime;
< use lib::sql::type::Int;
< use lib::sql::type::Text;
< use lib::sql::type::LongText;
< use lib::sql::DBH;
---
> use MKDoc::SQL;
Index: MKDoc/Site/Deploy/DB/Schema.pm
===================================================================
RCS file: /var/spool/cvs/mkd/MKDoc/Site/Deploy/DB/Schema.pm,v
retrieving revision 1.1.2.7
diff -r1.1.2.7 Schema.pm
37,44c37
< use lib::sql::Table;
< use lib::sql::Category;
< 
< use lib::sql::type::Char;
< use lib::sql::type::DateTime;
< use lib::sql::type::Int;
< use lib::sql::type::Text;
< use lib::sql::type::LongText;
---
> use MKDoc::SQL;
Index: MKDoc/Util/LinkParser.pm
===================================================================
RCS file: /var/spool/cvs/mkd/MKDoc/Util/Attic/LinkParser.pm,v
retrieving revision 1.1.2.7
diff -r1.1.2.7 LinkParser.pm
135c135
< use lib::sql::DBH;
---
> use MKDoc::SQL;
Index: flo/Standard.pm
===================================================================
RCS file: /var/spool/cvs/mkd/flo/Standard.pm,v
retrieving revision 1.12.2.14
diff -r1.12.2.14 Standard.pm
37c37
< use lib::sql::Table;
---
> use MKDoc::SQL;
Index: flo/Record/Ticket.pm
===================================================================
RCS file: /var/spool/cvs/mkd/flo/Record/Ticket.pm,v
retrieving revision 1.16.2.7
diff -r1.16.2.7 Ticket.pm
75c75,76
< use lib::sql::Condition;
---
> use MKDoc::SQL::Condition;
> use MKDoc::SQL;
330c331
<     # note: using NOW() doesn't work (it's quoted by lib::sql::Condition) so
---
>     # note: using NOW() doesn't work (it's quoted by MKDoc::SQL::Condition) so
332c333
<     my $cond = new lib::sql::Condition;
---
>     my $cond = new MKDoc::SQL::Condition;
Index: flo/editor/Headlines.pm
===================================================================
RCS file: /var/spool/cvs/mkd/flo/editor/Headlines.pm,v
retrieving revision 1.4.2.34
diff -r1.4.2.34 Headlines.pm
485,486c485,486
<     use lib::sql::Condition;
<     my $cond = new lib::sql::Condition;
---
>     use MKDoc::SQL::Condition;
>     my $cond = new MKDoc::SQL::Condition;
Index: flo/plugin/Headlines.pm
===================================================================
RCS file: /var/spool/cvs/mkd/flo/plugin/Headlines.pm,v
retrieving revision 1.1.2.11
diff -r1.1.2.11 Headlines.pm
97,98c97,98
<     use lib::sql::Condition;
<     my $cond = new lib::sql::Condition;
---
>     use MKDoc::SQL::Condition;
>     my $cond = new MKDoc::SQL::Condition;
Index: flo/plugin/Sitemap.pm
===================================================================
RCS file: /var/spool/cvs/mkd/flo/plugin/Sitemap.pm,v
retrieving revision 1.7.2.15
diff -r1.7.2.15 Sitemap.pm
50c50
< use lib::sql::Condition;
---
> use MKDoc::SQL;
Index: flo/plugin/Account/Reminder.pm
===================================================================
RCS file: /var/spool/cvs/mkd/flo/plugin/Account/Attic/Reminder.pm,v
retrieving revision 1.14.2.9
diff -r1.14.2.9 Reminder.pm
81c81
<     my $condition = new lib::sql::Condition();
---
>     my $condition = new MKDoc::SQL::Condition();
Index: flo/plugin/Admin/Move.pm
===================================================================
RCS file: /var/spool/cvs/mkd/flo/plugin/Admin/Move.pm,v
retrieving revision 1.1.2.8
diff -r1.1.2.8 Move.pm
163c163
<     use lib::sql::Condition;
---
>     use MKDoc::SQL::Condition;
166c166
<     my $condition  = new lib::sql::Condition();
---
>     my $condition  = new MKDoc::SQL::Condition();
Index: flo/plugin/Admin/UserModify.pm
===================================================================
RCS file: /var/spool/cvs/mkd/flo/plugin/Admin/UserModify.pm,v
retrieving revision 1.1.2.6
diff -r1.1.2.6 UserModify.pm
152c152
<         where => lib::sql::Condition->new(Grp_ID    => $id,
---
>         where => MKDoc::SQL::Condition->new(Grp_ID    => $id,
Index: tools/cron/020..newsletter.pl
===================================================================
RCS file: /var/spool/cvs/mkd/tools/cron/020..newsletter.pl,v
retrieving revision 1.1.2.18
diff -r1.1.2.18 020..newsletter.pl
225c225
<     my $con          = lib::sql::Condition->new(Editor_ID => $user->id);
---
>     my $con          = MKDoc::SQL::Condition->new(Editor_ID => $user->id);
249c249
<         where => lib::sql::Condition->new(Document_ID => $doc->id)
---
>         where => MKDoc::SQL::Condition->new(Document_ID => $doc->id)
411c411
<     my $query = new lib::sql::Query
---
>     my $query = new MKDoc::SQL::Query

_______________________________________________
MKDoc-dev mailing list
MKDoc-dev@...
https://lists.webarch.co.uk/mailman/listinfo/mkdoc-dev

Hi

One MKDoc server keeps getting listed on the CBL email spam list:

  http://cbl.abuseat.org/

And I think I have tracked this down to the use of Mail::CheckUser in
flo/plugin/Account/Subscribe.pm -- this is what the CBL says:

  The Perl CheckUser module defaults to improper "HELO" and "MAIL FROM"
  strings: "localhost.localdomain" and "check@..." respectively.
  The former is illegal, the latter impersonates user.com - they
  probably don't like that. [Besides, by not using your own domain, some
  spam filters will lie to your RCPT TO.]

  You will need to change $Helo_Domain = to be "<DNS name of your
  server>" and change $Sender_Addr to be something in _your_ domain (eg:
  "check@<mydomain>")

  http://cbl.abuseat.org/linuxnonserver.html

And if you run ethereal and capture the helo MKDoc does indeed use the
default of localhost.localdomain and the default email address of
check@... so I think this solves this mystery...

All that is needed now is for Subscribe.pm to be fixed so that it uses
the MKdoc public domain for the helo and the admin email address for the
check.

Chris

--

-- 
Chris Croome                               <chris@...>
web design                             http://www.webarchitects.co.uk/ 
web content management                               http://mkdoc.com/   

Hi

Images that have titles that match the title of a link component have a
bug in the way their links are constructed.

For example, on a site with http://www.example.org/ for the public and
http://users.example.org/ for admin:

- Upload a image titled "example"

- Add the text "example" to a text component

- Create a /about/example/ document

- Add a link component with the title set to "example" and the uri to
  "/about/example/"

Then in the public interface everything should be fine, the text
"example" and the image example both link to
http://www.example.org/about/example/ 

But when in admin the text links to
http://users.example.org/about/example/ but the image links to
http://www.example.org/about/example/ -- ie the public interface not the
users interface.

There is nothing in the template that contains the domain name so this
bug must be in the code.

Chris

--

-- 
Chris Croome                               <chris@...>
web design                             http://www.webarchitects.co.uk/ 
web content management                               http://mkdoc.com/   

Hi

There seem to be a odd redirect bug with the latest CVS version of MKDoc
1.6, for example if you add a photo attachment to the front page of a
site, and then go to view the scaled version then you get a redirect
loop and an address like this (this is truncated):

  /photo.jpg%2Chtml/photo.jpg%2Cscaled/photo.jpg-html/photo.jpg-scaled/photo.jpg-html/

Another way to trigger the bug is to edit the front page and then save
it, you get redirected to a 404:

  /.admin.content/

It appears that something is adding an extra / onto URLs?

This could be an issue caused by using Apache 1.3.34 -- but there is
nothing in the list of changes from version 1.3.33 that appears to be
behind this...

Or perhaps the latest Mozilla / Firefox browsers are munging the URLs --
they seem to be escaping "," to "%2C" which they didn't do before (this is
on Fedora Core 5) but IE 6 also seems to escape "," so perhaps it's
apache doing this rather than the clients... 

I'll try to do some debugging to see if I can track this down further...

Chris

--

-- 
Chris Croome                               <chris@...>
web design                             http://www.webarchitects.co.uk/ 
web content management                               http://mkdoc.com/   

Hi

I have created some RPMS for i368 FC5 for MKDoc dependancies, there are
less than ever (7) since most modules are now available from elsewhere,
these are the ones needed on a FC5 web server / software developer
install:

 =================================================================================
 Package                       Arch       Version          Repository        Size 
 =================================================================================
 perl-Lingua-31337             noarch     0.02-8           mkdoc             7.0 k
 perl-Locale-Maketext-Gettext  noarch     1.17-8           mkdoc              39 k
 perl-MKDoc-Text-Structured    noarch     0.83-8           mkdoc              26 k
 perl-MKDoc-XML                noarch     0.75-1.2.fc5.rf  dries              67 k
 perl-Mail-CheckUser           noarch     1.21-8           mkdoc              23 k
 perl-Mail-IMAPClient          noarch     2.2.9-1.2.fc5.rf dries             152 k
 perl-Petal                    noarch     2.18-8           mkdoc              86 k
 perl-Petal-Mail               noarch     0.31-8           mkdoc              14 k
 perl-Text-Unidecode           noarch     0.04-1.fc5       extras            116 k
 perl-Time-modules             noarch     2003.1126-3.fc5  extras             35 k
 perl-URI-Find                 noarch     0.16-8           mkdoc              17 k
 perl-XML-Parser               i386       2.34-6.1.2.2     core              211 k
 perl-XML-RSS                  noarch     1.10-1.fc5.rf    dries              29 k
 perl-libwww-perl              noarch     5.805-1.1        core              379 k

perl-Crypt-PassGen will probably be able to be deleted from the MKDoc
repo if Dries fixes a bug in his RPM.

I did try creating a perl-Bundle-MKDoc rpm but although it seemed to
work it didn't pull in all the other modules so I guess I must be doing
something wrong...

Instructions for installing these RPMS are here:

  http://rpms.mkdoc.com/#fc5

Chris  

--

-- 
Chris Croome                               <chris@...>
web design                             http://www.webarchitects.co.uk/ 
web content management                               http://mkdoc.com/   

1	October 2011
1	April 2007
1	February 2007
2	January 2007
2	December 2006
2	August 2006
1	July 2006
5	June 2006
5	April 2006
2	March 2006
9	February 2006
2	January 2006
5	December 2005
7	November 2005
1	October 2005
3	September 2005
2	August 2005
2	July 2005
1	June 2005
3	May 2005
6	April 2005
18	March 2005
18	February 2005
30	January 2005
13	December 2004
42	November 2004
102	October 2004
52	September 2004

berend@...: [rest-discuss] Cookie-less HTTP authentication how-to available]

Problem with photo creation dates

Adding sitemap in templates

Newsletter 'reply-to' address

Formatting in descriptions

patch to add option to automatically link to sibling documents

updated patch to remove lib::sql from MKDoc-1.6

[BUG] CheckUser.pm usage results in MKDoc sites being blackholed

[bug] 1.6 linked images

[1.6] Redirect bugs?

FC5 i386 RPMS for MKDoc

Mon	Tue	Wed	Thu	Fri	Sat	Sun

		1	2	3	4	5
6	7	8	9	10	11	12
13	14	15	16	17	18	19
20	21	22	23	24	25	26
27	28	29