Ero sivun ”Kommentointityökalu” versioiden välillä

Versio 30. toukokuuta 2014 kello 17.41

Tämä sivu on tietokide alatyypiltään metodi. Sivutunniste: Op_fi4224
Moderaattori:Ei ole (katso kaikki) Kuinka ryhtyä moderaattoriksi? Sivun edistymistä ei ole arvioitu. Arvostuksen määrää ei ole arvioitu (ks. peer review).
Lisää dataa {{#opasnet_base_link:Op_fi4224}}

Kysymys

Millainen on kommentointityökalu, joka

toimii osana Opasnetiä,
on avointa lähdekoodia,
kommentteja voidaan hallinnoida riippumatta ulkopuolisista palveluista?

Vastaus

Kommentointityökalu tallentaa käyttäjien antamia kommentteja tietokantaan. Tallennettava taulu on tämän näköinen, ja jokainen kommentti tallennetaan omalle rivilleen.

**Kommentit**
Obs	Aika	Kommentti	Liittymä	Result
Juokseva numero	Kommentin tallennusaika	Kommentin sisältö	Jos kommentti liittyy toiseen kommenttiin tai asiaan sivulla, kommentin numero tai asian nimi tai kuvailu	Tekninen sarake, jota ei tällä hetkellä käytetä.

Kommentteja voi myös poistaa näkyvistä. Tietokannasta ei kuitenkaan poisteta tietoa, vaan tällaiseen tauluun laitetaan kommentille poistomerkintä.

**Kommenttipoistot**
Kommenttinro	Syy	Result
Kommentin numero Obs-sarakkeesta	Poistamisen syy. Käyttöliittymässä on tarjottuna pudotusvalikossa olennaiset syyt.	Tekninen sarake

Ohjeita kommentointityökalun käyttöönottoon

Sijoita työkalu kakkostason väliotsikon "Kommentoi kirjautumatta" alle.
Kommentointityökalu pitää alustaa kopioimalla alla oleva koodi kyseiselle sivulle. Esikatsele sivu, jolloin alustuskoodi ajetaan automaattisesti. Sivua ei tarvitse tallentaa tässä vaiheessa.

<rcode live=1 variables="
	name:pagename|type:hidden|default:'{{PAGENAME}}'|
	name:ident|type:hidden|default:'Op_fi{{PAGEID}}'
">

library(OpasnetUtils)

dat1 <- data.frame(
	Obs = 1, 
	Aika = date(), 
	Kommentti = paste("Alustettu sivu", pagename, ident), 
	Liittymä = 0, 
	Result = 1
)

opbase.upload(dat1, ident = ident, name = pagename, subset = "Kommentit", act_type = "replace", 
	language = "fin", who = wiki_username)

dat2 <- data.frame(Kommenttinro = 0, Syy = "Alustus", Result = 1)

opbase.upload(dat2, ident = ident, name = pagename, subset = "Kommenttipoistot", act_type = "replace", language = "fin",
	who = wiki_username)

cat("Alustus onnistui.\n")
</rcode>

Kun saat ilmoituksen alustuksen onnistumisesta, voit poistaa alustuskoodin sivulta ja kopioida varsinaisen mallineen:

{{kommentointityökalu}}

Mallineelle voi antaa kaksi parametria, mutta yleensä näitä ei tarvita.

Voit laittaa sivutunnisteen ensimmäiseksi parametriksi, mutta tätä tarvitaan vain poikkeustapauksissa, jos kommentit halutaan tallentaa jonkin muun sivun kuin oman sivun kohdalle. Sivutunniste on muotoa Op_fi1234.
Jos kakkoskysymys eli liittymä toiseen kommenttiin halutaan piilottaa, pitää toiseksi parametriksi laittaa hidden.

Ota uudestaan esikatselu ja varmista, että malline toimii oikein ja että se löytää yhden kommentin, jonka sisältö on "Alustettu sivu X", jossa X on sinun sivusi nimi.

{{kommentointityökalu|Op_fiXXXX|hidden}}

Perustelut

Vastauksessa on tuontantokäytössä oleva työkalu. Perusteluissa on kehitysvaiheen malli.

Voit kommentoida sisältöä myös kirjautumatta Opasnetiin yksinkertaisesti kirjoittamalla kommenttisi alla olevaan kenttään. Sivun moderaattori siirtää kommenttisi asiasisällön osaksi sivun tekstiä ja siirtää kommentin sitten arkistoon: {{#opasnet_base_link:Op_fi4224}} .

Tämänhetkiset kommentit, jota ei ole vielä sisällytetty sivulle tai keskustelusivulle.

Jos haluat löytää tällä sivulla aiemmin olleen kommentin, mene sivulle Kommenttihaku ja anna kommentin tunnistelinkki.

Katso myös

Malline:Kommentointityökalu

@@ Rivi 102: / Rivi 102: @@
 </rcode>
-; Tämänhetkiset kommentit, jota ei ole vielä sisällytetty sivulle tai keskustelusivulle.
+;<span name="Kommentit">Tämänhetkiset kommentit, jota ei ole vielä sisällytetty sivulle tai keskustelusivulle.</span>
+Jos haluat löytää tällä sivulla aiemmin olleen kommentin, mene sivulle [[Kommenttihaku]] ja anna kommentin tunnistelinkki.
-<rcode live=1 showcode=-1 variables="name:ident|type:hidden|default:'{{{1|Op_fi{{PAGEID}}}}}'">
+<rcode live=1 showcode=-1 variables="
+	name:ident|type:hidden|default:'{{{1|Op_fi{{PAGEID}}}}}'|
+	name:pagename|type:hidden|default:'{{PAGENAME}}'
+">
 library(OpasnetUtils)
+library(OpasnetUtilsExt)
+pagename <- gsub(" ", "_", pagename)
 dat <- opbase.data(ident, subset = "Kommentit")
@@ Rivi 113: / Rivi 120: @@
 dat <- dat[!dat$Obs %in% poistot , colnames(dat) != "Result"]
-if(nrow(dat) == 0) cat("Kaikki kommentit on sisällytetty tekstiin.\n") else oprint(dat)
+if(nrow(dat) == 0) {
+	cat("Kaikki kommentit on sisällytetty tekstiin.\n")
+} else {
+	oprint(dat)
+	cat("Kommenttien tunnistelinkit (tarvitaan tägäyksessä):\n")
+	for(i in 1:nrow(dat)) {
+		olink(
+			paste(pagename, "?Komm=", dat$Obs[i], "#Kommentit", sep = ""),
+			wiki = "op_fi",
+			text = paste(dat$Obs[i], substr(dat$Kommentti[i], 1, 30))
+		)
+		if(i == nrow(dat)) cat("\n") else cat(" &middot; ")
+	}
+}
 </rcode>