Posted to tcl by mjanssen at Wed Oct 22 21:10:23 GMT 2008view raw
- set config_options {create_version video_player video_device frequency_table video_bitrate_high osd_enabled videoplayer_options temporal_filter video_standard_v4l2 video_standard_scantv mixer_channel update_daemon_enabled}
- set option(video_player) Kaffeine
- set option(frequency_table) europe-west
- set option(video_bitrate)_high 0
- set option(video_device) /dev/video0
- set option(osd_enabled) 1
- set option(videoplayer_options) "-m"
- set option(temporal_filter) 0
- set option(video_standard_v4l2) 0x000000000000000F
- set option(video_standard_scantv) PAL-BGH
- set option(mixer_channel) ""
- set option(update_daemon_enabled) 1
- if {[file exists "$::env(HOME)/Projekte/TV-Viewer/grundlagen/testconfigfile"]} {
- puts "
- Found a config file,
- reading values..."
- set open_config_file [open "$::env(HOME)/Projekte/TV-Viewer/grundlagen/testconfigfile" r]
- array set options [read $open_config_file]
- close $open_config_file
- parray options
- Configfile:
- video_bitrate_high 1
- .
- .
- .
- videoplayer_options {-m -k -l}