announcing Template::Toolkit patch

[git.ikiwiki.info.git] / doc / todo / bzr.mdwn

diff --git a/doc/todo/bzr.mdwn b/doc/todo/bzr.mdwn
index 9650b9da8cdccff2eb4f063d75e246c81366ea35..a50c58d26d1deaee5a1a2dbbef66c09ed848371d 100644 (file)
--- a/doc/todo/bzr.mdwn
+++ b/doc/todo/bzr.mdwn
@@ -4,6 +4,8 @@ rcs_commit was only changed to work around bzr's lack of a switch to set the
 username). bzr_log could probably be written better by someone better at perl,
 and rcs_getctime and rcs_notify aren't written at all. --[[bma]]
 
 username). bzr_log could probably be written better by someone better at perl,
 and rcs_getctime and rcs_notify aren't written at all. --[[bma]]
 

+(rcs_notify is not needed in this branch --[[Joey]])
+

     #!/usr/bin/perl
     
     use warnings;
     #!/usr/bin/perl
     
     use warnings;


@@ -54,15 +56,15 @@ and rcs_getctime and rcs_notify aren't written at all. --[[bma]]
             return @ret;
     }
     
             return @ret;
     }
     

-    sub rcs_update () { #{{{
+    sub rcs_update () {

             # Not needed.
             # Not needed.

-    } #}}}
+    }

     
     

-    sub rcs_prepedit ($) { #{{{
+    sub rcs_prepedit ($) {

             return "";
             return "";

-    } #}}}
+    }

     
     

-    sub rcs_commit ($$$;$$) { #{{{
+    sub rcs_commit ($$$;$$) {

             my ($file, $message, $rcstoken, $user, $ipaddr) = @_;
     
             if (defined $user) {
             my ($file, $message, $rcstoken, $user, $ipaddr) = @_;
     
             if (defined $user) {


@@ -93,18 +95,18 @@ and rcs_getctime and rcs_notify aren't written at all. --[[bma]]
             system("bzr","whoami",$olduser);
     
             return undef; # success
             system("bzr","whoami",$olduser);
     
             return undef; # success

-    } #}}}
+    }

     
     

-    sub rcs_add ($) { # {{{
+    sub rcs_add ($) {

             my ($file) = @_;
     
             my @cmdline = ("bzr", "add", "--quiet", "$config{srcdir}/$file");
             if (system(@cmdline) != 0) {
                     warn "'@cmdline' failed: $!";
             }
             my ($file) = @_;
     
             my @cmdline = ("bzr", "add", "--quiet", "$config{srcdir}/$file");
             if (system(@cmdline) != 0) {
                     warn "'@cmdline' failed: $!";
             }

-    } #}}}
+    }

     
     

-    sub rcs_recentchanges ($) { #{{{
+    sub rcs_recentchanges ($) {

             my ($num) = @_;
     
             eval q{use CGI 'escapeHTML'};
             my ($num) = @_;
     
             eval q{use CGI 'escapeHTML'};


@@ -151,15 +153,15 @@ and rcs_getctime and rcs_notify aren't written at all. --[[bma]]
             }
     
             return @ret;
             }
     
             return @ret;

-    } #}}}
+    }

     
     

-    sub rcs_notify () { #{{{
+    sub rcs_notify () {

             # TODO
             # TODO

-    } #}}}
+    }

     
     

-    sub rcs_getctime ($) { #{{{
+    sub rcs_getctime ($) {

             # TODO
             # TODO

-    } #}}}
+    }

     
     1
 
     
     1
 


@@ -188,3 +190,5 @@ and rcs_getctime and rcs_notify aren't written at all. --[[bma]]
 > I've just posted another patch with support for bzr, including support for 
 > --author and a testsuite to git://git.samba.org/jelmer/ikiwiki.git. I hadn't 
 > seen this page earlier.  --[[jelmer]]
 > I've just posted another patch with support for bzr, including support for 
 > --author and a testsuite to git://git.samba.org/jelmer/ikiwiki.git. I hadn't 
 > seen this page earlier.  --[[jelmer]]

+
+> I used jelmer's patch --[[done]]! --[[Joey]]