Project objectives

The main objective of the project LIFE13 NAT/IT/001129 is the conservation and recovery of native populations of two barbel species in the Emilian tributaries of the Po river, in 14 sites of the Rete Natura 2000, through in situ and ex situ interventions as well as the drawing up of guidelines. Italian populations of Common Barbel (Barbus plebejus) and Southern Barbel (Barbus meridionalis, syn. B. caninus) are increasingly declining as also evidenced by the update of the IUCN Red List where the risk status of the two species has been listed as “vulnerable” and “endangered” respectively. In the Emilia Romagna Region the constant qualitative-quantitative decline of populations of both species asks for targeted interventions both at environmental level and with reference to ex situ breeding practices. Starting with the detailed study of the density and distribution of populations, as well as an analysis of threats, the specific objectives of the proposal are as follows:

  1. to create new populations and/or reinforce existing populations, in connection with environmental suitability and the composition of the fish community, through specific in situ interventions (reduction of biodiversity loss /defragmentation) and ex situ breeding practices);
  2. to identify the threats to the survival of the species at a local scale, and open up discussion among stakeholders in order to reduce such threats through an interprovincial approach thanks to a lasting governance for the protection of target species and , indirectly, of river biodiversity;
  3. to eradicate/control the spread of invasive alien species;
  4. to establish guidelines for the conservation and sustainable management of species, also to be used for the creation of a general European model; to transfer best practices.
The project objectives will be achieved in compliance with the IUCN guidelines: such objectives will not affect the conservation of global biodiversity, but rather have a positive impact also on other fish species of community interest such as the Western vairone (Leuciscus souffia), the Mediterranean trout (Salmo macrostigma), the roach (Chondrostoma genei) and the Twaite shad (Alosa fallax), which are present in the area of investigation. The University of Parma is the leader of the project; associated beneficiaries are: the Po river Basin Authority, the Management Body for Parks and Biodiversity of the Western Emilia region, the Foundation Mario Negri Sud, the academic Spin Off Gen Tech S.r.l. and the Tuscan-Emilian Apennine National Park. The project will last four years with a total budget of 2,189,378 Euros , 50% of which co-financed by the European Union through the Eu’s financial programme LIFE+. The project encompasses n. 26 specific actions. 

class "Login" already exists
    while executing
"::itcl::class Login {
        inherit Barbie

        private variable loginmenu
        private variable logoutmenu

        public method willHandle..."
    (in namespace eval "::rwdatas" script line 3)
    invoked from within
"namespace eval ::rwdatas {

    ::itcl::class Login {
        inherit Barbie

        private variable loginmenu
        private variable logoutmenu

..."


OUTPUT BUFFER:

source [file join $rweb_root tcl before.tcl]
package require Barbie

namespace eval ::rwdatas {

    ::itcl::class Login {
        inherit Barbie

        private variable loginmenu
        private variable logoutmenu

        public method willHandle {arglist keyvar} 
        public method fetchData {key reassigned_key} 
        public method init {args} 
        public method menu_list {page}
        #public proc to_url {lm} { return [Barbie::to_url $lm] }
    }

    ::itcl::body Login::init {args} {

        $this register_class ::rwpage::UserLogin

        set mm $::rivetweb::menumodel
        set lm $::rivetweb::linkmodel
        set loginmenu [$mm create_menu loginmenu root normal]
        $loginmenu assign title "Login" $::rivetweb::language
        
        $loginmenu add_link [$lm create Login "" { it "Login" en "Login" }  \
                                                 [dict create login 1]      \
                                                 [dict create it "Login Sito" \
                                                              en "Site Login"]]

        set logoutmenu [$mm create_menu logoutmenu root normal]
        $logoutmenu assign title "Logout" $::rivetweb::language
        $logoutmenu add_link [$lm create Login "" { it "Logout" en "Logout" }  \
                                                 [dict create logout 1]       \
                                                 [dict create it "Logout dal Sito" \
                                                              en "Site Logout"]]
        

    }

    ::itcl::body Login::willHandle {arglist keyvar} {
        upvar $keyvar key 

        #puts "
######### [::SESSION fetch status logged] ########
"

        $this check_class ::rwpage::UserLogin
        set current_login_status [::SESSION fetch status logged]

        ::rivet::apache_log_error debug \
            "current_login_status: $current_login_status (logout: [::rivet::var exists logout])"

        if {[::rivet::var exists login] && ($current_login_status == 0)} {

            set key user_login
            return -code break -errorcode rw_ok

        } elseif {[::rivet::var exists logout] && ($current_login_status > 0)} {

            set key user_logout
            return -code break -errorcode rw_ok

        }
        ::rivet::apache_log_error debug "::rwdatas::Login not handling request for args $arglist"
        return -code continue -errorcode rw_continue
    }

    ::itcl::body Login::fetchData {key reassigned_key} {
        upvar $reassigned_key rkey

        set rkey $key
        
        if {($key == "user_login") || ($key == "user_logout")} {
			return [::rwpage::UserLogin ::#auto $key]
		} else {
			return ""
		}
		
    }

    ::itcl::body Login::menu_list {page} {
        if {[::SESSION fetch status logged] == 0} {
            return [list site_management $loginmenu]
        } else {
            $logoutmenu assign title \
                        "Logout [::SESSION fetch status username]" $::rivetweb::language 

            return [list site_management $logoutmenu]
        }
    }
}

package provide Login 1.0
source [file join $rweb_root tcl after.tcl]