Log in

No account? Create an account
LiveJournal Client Discussions [entries|archive|friends|userinfo]
LiveJournal Client Discussions

[ userinfo | livejournal userinfo ]
[ archive | journal archive ]

Version 0.12 of LJ::Simple released [Jan. 6th, 2005|12:58 am]
LiveJournal Client Discussions


[mood |accomplishedaccomplished]
[music |Frantic Euphoria - CD3]

Well, after a long hiatus I've just released version 0.12 of the perl module LJ::Simple into CPAN - it should show up on there fairly soon. In the mean time its also available from my web site

The changes in this release are:

  • Added the $LJ::Simple::NonBlock hook to allow better integration with GUI programs
  • Added the $LJ::Simple::ProtoSub hook to allow better integration with GUI programs
  • The ljpost example script is now placed within the Solaris package the pkg Makefile target builds
  • Corrected a bug in ljpost which caused it to handle timezones incorrectly.
  • Added the sending of a User-Agent string
  • GetEntries() has been fixed so that if it is getting entries from a shared journal that shared journal name is placed within the entries returned back in the hash.
    Bug reported by Stanislav Sinyagin
  • Re-worked the documentation so its easier to use
  • Added the SetProtect() routine as a wrapper around the various SetProtect*() routines.
  • Added the LJ::Simple::QuickPost() routine which allows you to quickly post an entry into LiveJournal without going through the work of object creation et al

[User Picture]From: my_death_life
2005-01-12 07:48 pm (UTC)
get message
Not a CODE reference at /usr/lib/perl5/site_perl/5.8.3/LJ/Simple.pm line 489.,

in log file, if used subject variable


user => "user",
pass => "pass",
music => $main->param('diary_song'),
subject => "Static",
entry => $diary_body,

without line subject => "Static" - OK

(Reply) (Thread)
[User Picture]From: simonb
2005-01-12 09:20 pm (UTC)

How annoying; the following patch will fix this problem. I'll release 0.12.1 in a minute

--- Simple.pm   5 Jan 2005 23:29:04 -0000       1.81
+++ Simple.pm   12 Jan 2005 21:09:13 -0000
@@ -487,7 +487,7 @@
   $lj->NewEntry(\%Event) || return 0;
   $lj->SetEntry(\%Event,$opts{entry}) || return 0;
   (exists $opts{subject}) &&
-    ($lj->(\%Event,$opts{subject}) || return 0);
+    ($lj->SetSubject(\%Event,$opts{subject}) || return 0);
   (exists $opts{mood}) &&
     ($lj->SetMood(\%Event,$opts{mood}) || return 0);
   (exists $opts{music}) &&

Thanks for letting me know about it.

(Reply) (Parent) (Thread)