language-switcher_polylang_partly_https.php

					$languages = pll_the_languages( array( 'raw' => 1 ) );
					$current = array_filter( $languages, create_function( '$v', 'return (bool) $v["current_lang"];' ) );
					$current = reset( $current );

					printf( '<ul id="nav--lang__menu" class="nav--lang__menu">
								<li>
									<a href="#" class="lang--on lang-item--%s">%s</a>
									<ul class="lang__sel">',
							$current['slug'], $current['name'] );

					foreach ( $languages as $language ) {
						// exclude current language from menu
						if ( $language['current_lang'] == '1' ) {
							continue;
						}
						$url = $language['url'];
						$url = preg_replace( "/^https:/i", "http:", $url );
						// Austrian; todo
						if ( $language['slug'] == 'de' ) {
						printf ( '<li class="lang-item--%1$s">
										<a href="%2$s" hreflang="%1$s">%3$s</a>
									</li>',
							$language['slug'], $language['url'], $language['name'] );
						}
						else {
						printf ( '<li class="lang-item--%1$s">
										<a href="%2$s" hreflang="%1$s">%3$s</a>
									</li>',
							$language['slug'], $url, $language['name'] );
						}
					}
					echo '			</ul>
								</li>
							</ul>';