Initial Import

intranet-bug-tracker.info

+<?xml version="1.0"?>
+<!-- Generated by the OpenACS Package Manager -->
+
+<package key="intranet-bug-tracker" url="http://openacs.org/repository/apm/packages/intranet-bug-tracker" type="apm_application">
+    <package-name>]project-open[ Bug Tracker</package-name>
+    <pretty-plural>]project-open[ Bug Tracker</pretty-plural>
+    <initial-install-p>f</initial-install-p>
+    <singleton-p>t</singleton-p>
+    <auto-mount>intranet-bug-tracker</auto-mount>
+
+    <version name="0.1d" url="http://openacs.org/repository/download/apm/intranet-bug-tracker-0.1d.apm">
+        <owner url="mailto:frank.bergmann@project-open.com">Frank Bergmann</owner>
+        <summary>]project-open[ Interface to OpenACS Bug Tracker</summary>
+        <vendor url="http://www.project-open.com/">]project-open[</vendor>
+        <description format="text/plain">Provides a project-based customer's interface to the OpenACS bug tracker. Permissions are restricted on a per-project base and the bugs are timesheet costs associated can be automatically invoiced</description>
+
+        <!-- No dependency information -->
+
+        <callbacks>
+        </callbacks>
+        <parameters>
+        <!-- No version parameters -->
+        </parameters>
+
+    </version>
+</package>

tcl/intranet-bug-tracker-procs.tcl

+# /packages/intranet-bug-tracker/tcl/intranet-bug-tracker.tcl
+#
+# Copyright (c) 2003-2006 ]project-open[
+#
+# All rights reserved. Please check
+# http://www.project-open.com/license/ for details.
+
+ad_library {
+    This Bug-Tracker integration aloows to associate ]po[ tasks
+    with OpenACS Bug-Tracker tickets, allowing for the best of
+    the two worlds
+	- Developer friendly maintenance of product bugs
+	- Multiple "Products"
+	- A customer wizard to create new bugs and to check his
+	  own bugs, but without being able to see the bugs of
+	  other customers
+	- Integration with Timesheet Billing using the billing
+	  wizard.
+
+    @author frank.bergmann@project-open.com
+}
+
+
+# ----------------------------------------------------------------------
+# Constants
+# ----------------------------------------------------------------------
+
+ad_proc -public im_project_type_bt_container { } { return 4300 }
+ad_proc -public im_project_type_bt_task { } { return 4305 }
+
+
+
+# ----------------------------------------------------------------------
+# Package ID
+# ----------------------------------------------------------------------
+
+
+ad_proc -public im_package_bug_tracker_id {} {
+    Returns the package id of the intranet-bug-tracker module
+} {
+    return [util_memoize "im_package_bug_tracker_id_helper"]
+}
+
+ad_proc -private im_package_bug_tracker_id_helper {} {
+    return [db_string im_package_core_id {
+        select package_id from apm_packages
+        where package_key = 'intranet-bug-tracker'
+    } -default 0]
+}
+
+
+# ----------------------------------------------------------------------
+# Components
+# ----------------------------------------------------------------------
+
+ad_proc -public im_bug_tracker_container_component {
+
+} {
+    Returns a HTML widget for a BT "Container Project" to allow
+    the PM to set BT parameters like the BT project (better: "Product")
+    and the current version, so that the customer doesn't need to set
+    all these variables.
+} {
+    return ""
+
+
+
+
+}
+