add 'nautilus2sylpheed.sh' and remove 'launch_firebird'
authorPaul Mangan <paul@claws-mail.org>
Tue, 25 May 2004 07:37:40 +0000 (07:37 +0000)
committerPaul Mangan <paul@claws-mail.org>
Tue, 25 May 2004 07:37:40 +0000 (07:37 +0000)
AUTHORS
ChangeLog.claws
configure.ac
tools/Makefile.am
tools/README
tools/launch_firebird [deleted file]
tools/nautilus2sylpheed.sh [new file with mode: 0644]

diff --git a/AUTHORS b/AUTHORS
index 2893b1e..9739d4f 100644 (file)
--- a/AUTHORS
+++ b/AUTHORS
@@ -203,3 +203,4 @@ contributors (beside the above; based on Changelog)
        Chad Robinson
        Edgar Toernig
        Fabien Vantard
+       Reza Pakdel
index 26bdff4..dd613e6 100644 (file)
@@ -1,3 +1,17 @@
+2004-05-25 [paul]      0.9.10claws70
+
+       * AUTHORS
+         tools/Makefile.am
+         tools/README
+         tools/nautilus2sylpheed.sh            ** NEW FILE **
+               add script to enable sending files from
+               nautilus.
+               Submitted by Reza Pakdel <hrpakdel@cpsc.ucalgary.ca>
+               
+       * tools/launch_firebird                 ** REMOVED **
+               removed as the standard "firefox '%s'" now functions
+               correctly
+
 2004-05-23 [paul]      0.9.10claws69
 
        * src/compose.c
index f09c726..7a0b083 100644 (file)
@@ -11,7 +11,7 @@ MINOR_VERSION=9
 MICRO_VERSION=10
 INTERFACE_AGE=0
 BINARY_AGE=0
-EXTRA_VERSION=69
+EXTRA_VERSION=70
 
 if test $EXTRA_VERSION -eq 0; then
     VERSION=${MAJOR_VERSION}.${MINOR_VERSION}.${MICRO_VERSION}claws
index f40f476..49a181e 100644 (file)
@@ -11,9 +11,9 @@ EXTRA_TOOLS = \
        google_search.pl \
        kmail2sylpheed.pl \
        kmail2sylpheed_v2.pl \
-       launch_firebird \
        maildir2sylpheed.pl \
        multiwebsearch.pl \
+       nautilus2sylpheed.sh \
        newscache_clean.pl \
        outlook2sylpheed.pl \
        sylpheed-switcher \
index be61a15..e9da147 100644 (file)
@@ -27,6 +27,7 @@ Mailbox conversion:
 
 Other tools:
   filter_conv.pl                Convert old-style filters to new filtering
+  nautilus2sylpheed.sh         Send files from Nautilus
   newscache_clean.pl            Clean up news directory
   OOo2sylpheed.pl               Send documents from OpenOffice.org
   sylpheed-switcher             Run either sylpheed or claws (separate configs)
@@ -35,7 +36,6 @@ Other tools:
 
 Extra tools:
   gif2xface.pl                  Convert a 48x48 GIF file to an X-Face header
-  launch_firebird              Open URLs in mozilla-firebird
 
 --------------------------------------------------------------------------------
 Detailed Descriptions:
@@ -386,6 +386,24 @@ Other tools
   Contact: Paul Mangan <claws@thewildbeast.co.uk>
   
 
+* nautilus2sylpheed.sh
+
+  WHAT IT DOES
+       This script will recursively attach a number of selected 
+       files/directories from Nautilus to a new blank e-mail.
+
+  HOW TO USE IT
+       Copy the script to $HOME/.gnome2/nautilus-scripts, chmod u+x, 
+       and restart nautilus (killall -9 nautilus). You will now have 
+       a right-click menu item: '/Scripts/nautilus2sylpheed.sh'
+       
+  LIMITATIONS
+       Files/Directories with spaces in the names cannot be handled
+       correctly.
+
+  Contact: Reza Pakdel <hrpakdel@cpsc.ucalgary.ca>
+
+
 * newscache_clean.pl
 
   WHAT IT DOES AND WHY IT DOES IT
@@ -547,20 +565,4 @@ Extra tools
 
   Contact: Ricardo Mones Lastra <mones@aic.uniovi.es>
 
-
-* launch_firebird
-
-  WHAT IT DOES
-       Check for a running mozilla-firebird process and and open a new tab 
-       with a given URL, or execute mozilla-firebird with that URL
-  
-  HOW TO USE IT  
-       In Common Preferences move to the 'Other' tab and enter the
-       following in the 'Web browser' box
-  
-       launch_firebird '%s'
-  
-  Contact: Mohammed Sameer <Uniball@linux-egypt.org>
-
-
 --------------------------------------------------------------------------------
diff --git a/tools/launch_firebird b/tools/launch_firebird
deleted file mode 100644 (file)
index 5cae436..0000000
+++ /dev/null
@@ -1,53 +0,0 @@
-#!/bin/bash
-
-# Copyright © 2002 Mohammed Sameer <Uniball@linux-egypt.org> 
-#
-# This file is free software; you can redistribute it and/or modify it
-# under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 2 of the License, or
-# (at your option) any later version.
-# 
-# This program is distributed in the hope that it will be useful, but
-# WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-# General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-#
-############################################################################
-# Script Name: launch_firebird
-# Author: Mohammed Sameer <Uniball@linux-egypt.org>
-# Script Version: 0.2
-# Script Purpose: Check for a running firebird process and and open a new 
-#                tab with a given URL or execute firebird with that URL
-# Usage: preferences->other->web browser-> "launch_firebird "%s""
-############################################################################
-# Version 0.2, June 2003, Paul Mangan <claws@thewildbeast.co.uk>
-# Changes: renamed and edited to reflect the browser's name change from
-# 'phoenix' to 'firebird'.
-############################################################################
-
-URL=$*
-# name of binary (change it if necessary):
-FIREBIRD=mozilla-firebird
-
-firebird_running()
-{
-$FIREBIRD -remote "openurl($URL,new-tab)"
-}
-firebird_new()
-{
-$FIREBIRD $URL
-}
-
-
-STR=`$FIREBIRD -remote "ping()" 2>&1 | grep No`
-#echo $STR
-if [[ "$STR" == "No running window found." ]]; then
-firebird_new;
-else
-firebird_running;
-fi
-
diff --git a/tools/nautilus2sylpheed.sh b/tools/nautilus2sylpheed.sh
new file mode 100644 (file)
index 0000000..364dca7
--- /dev/null
@@ -0,0 +1,55 @@
+#!/bin/bash
+
+# nautilus2sylpheed.sh
+# Copyright 2004 Reza Pakdel <hrpakdel@cpsc.ucalgary.ca>
+
+# This program is free software; you can redistribute it and/or
+# modify it under the terms of the GNU General Public License
+# as published by the Free Software Foundation; either version 2
+# of the License, or (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+# 02111-1307, USA.
+
+# This script will recursively attach a number of selected 
+# files/directories from Nautilus to a new blank e-mail.
+
+attachments=""
+
+attach_dir()
+{   
+    if [ -d $1 ] 
+    then
+       for j in $(ls $1)
+       do
+         attach_dir $1"/"$j
+       done
+    else
+       attachments="$attachments $1"
+    fi
+}
+
+for i in $*
+do
+  if [ -d $i ]
+  then
+      for file in $(ls $i)
+      do
+       attach_dir $i"/"$file
+      done
+  else
+      attachments="$attachments $i";
+  fi  
+done
+
+echo "-----------"
+echo $attachments
+sylpheed --compose --attach $attachments
+