From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/6478 Path: main.gmane.org!not-for-mail From: Kai Grossjohann Newsgroups: gmane.emacs.gnus.general Subject: Re: Using a Gnus for collaborative work & todo list mgmt? Date: 31 May 1996 16:05:39 +0200 Sender: grossjoh@buster.informatik.uni-dortmund.de Message-ID: References: Reply-To: Kai Grossjohann NNTP-Posting-Host: coloc-standby.netfonds.no Mime-Version: 1.0 (generated by tm-edit 7.52) Content-Type: text/plain; charset=US-ASCII X-Trace: main.gmane.org 1035146926 3704 80.91.224.250 (20 Oct 2002 20:48:46 GMT) X-Complaints-To: usenet@main.gmane.org NNTP-Posting-Date: Sun, 20 Oct 2002 20:48:46 +0000 (UTC) Cc: ding@ifi.uio.no, Thomas Roelleke , Christian Altenschmidt , Ulrich Pfeifer Return-Path: ding-request@ifi.uio.no Original-Received: from ifi.uio.no (ifi.uio.no [129.240.64.2]) by deanna.miranova.com (8.7.5/8.6.9) with SMTP id HAA23327 for ; Fri, 31 May 1996 07:50:47 -0700 Original-Received: from floyd.informatik.uni-dortmund.de (floyd.informatik.uni-dortmund.de [129.217.4.40]) by ifi.uio.no with ESMTP (8.6.11/ifi2.4) id for ; Fri, 31 May 1996 16:05:45 +0200 Original-Received: from buster.informatik.uni-dortmund.de by floyd.informatik.uni-dortmund.de with SMTP (Sendmail 8.7.5/UniDo 3.11) id QAA13887; Fri, 31 May 1996 16:05:43 +0200 (MES) Original-Received: by buster.informatik.uni-dortmund.de id AA17377; Fri, 31 May 96 16:05:40 +0200 Original-To: Kai Grossjohann In-Reply-To: Kai Grossjohann's message of 29 May 1996 11:28:18 +0200 Original-Lines: 75 X-Mailer: Gnus v5.2.3/Emacs 19.30 Xref: main.gmane.org gmane.emacs.gnus.general:6478 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:6478 >>>>> On 29 May 1996 11:28:18 +0200, Kai Grossjohann >>>>> said: Kai> Hi there, we're thinking about maintaining todo lists with Gnus Kai> for a group of people. So far, here's what we've come up with: Following Lars' suggestion, I tried setting up a few nnmh groups and quickly ran into the problem of seemingly being unable to `send' an article without *actually* sending it anywhere by mail or news. I briefly thought about creating a devnull mail alias or posting the stuff to the junk newsgroup. I refrained from actually doing that because it caused me pain, though 8-) Anyway, here's what I did. It's a kludge, fer sure, but I'll be happy about any suggestions you might have. When doing `a' in a group that matches the gnus-cscw-group-regexp (a hideous euphemism) a Gcc header is automatically included. This seems to work, kinda. Maybe the code should delete empty To and Cc headers automatically, too. Unbelievable. I spent a day looking for this -- must seriously reconsider my being a novice with regard to ELisp. :-| kai -- Life is hard and then you die. ;;;;;;;;;;;;;;;;;;;;;;;;;;; -*- Mode: Emacs-Lisp -*- ;;;;;;;;;;;;;;;;;;;;;;;;;; ;; gnus-cscw.el -- ;; ITIID : $ITI$ $Header $__Header$ ;; Author : Kai Grossjohann ;; Created On : Thu May 30 17:57:45 1996 ;; Last Modified By: Kai Grossjohann ;; Last Modified On: Thu May 30 21:24:55 1996 ;; Update Count : 49 ;; Status : Unknown, Use with caution! ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'gnus) (require 'gnus-msg) (require 'nnmh) (require 'message) ;; Variables (defvar gnus-cscw-group-regexp "^nnmh:cscw" "Regexp matching cwsc group names.") ;; Functions (defun message-setup-news-cscw () "Hook that inserts correct Gcc header for cscw message." (cond ((and gnus-newsgroup-name (string-match gnus-cscw-group-regexp gnus-newsgroup-name)) (save-excursion (beginning-of-buffer) (message-position-on-field "gcc") (beginning-of-line) (kill-line 1) (insert "Gcc: " gnus-newsgroup-name "\n")) (add-hook 'message-send-hook 'message-cscw-generate-headers nil t)))) (add-hook 'message-setup-hook 'message-setup-news-cscw) (defun message-cscw-generate-headers () (message-generate-headers message-required-mail-headers)) (provide 'gnus-cscw)